- or download this
#!/usr/bin/perl
package ParantClass;
...
return @GoesChild1;
}
return 1;
- or download this
#!/usr/bin/perl
...
print "This Values go to perl program and display the Values :
+:::\n\n\n";
}
return 1;
- or download this
#!/usr/bin/perl
use Child1Class;
$object = Child1Class->new();
print $object->useChild1();