Jump to content

Object serialization: Difference between revisions

m
→‎{{header|Perl}}: adding newlines
m (→‎{{header|Perl}}: adding newlines)
Line 793:
package Greeting;
sub new {
my $v = '"Hello world!'\n";
bless \$v, shift;
};
Line 804:
use base qw(Greeting); # inherit methods
sub new { # overwrite method of super class
my $v = '"Hello world from Junior!'\n";
bless \$v, shift;
};
Anonymous user
Cookies help us deliver our services. By using our services, you agree to our use of cookies.