01 02 03 04 05 06 07 08 09 10 [download]
$obj = MyDyn->new(id => 'MyObj'); print $obj->id, "\n"; $obj->action(); package MyDyn; use base 'DynObject'; sub action { print "hi\n"; } [download]
Some remarks:
Cheers Rolf (addicted to the Perl Programming Language and ☆☆☆☆ :)
PS: Je suis Charlie!
In reply to Re: Change default style sheet: add line numbers by LanX in thread Change default style sheet: add line numbers by roboticus