- or download this
sub _ { print "perl "; ::->() }
sub :: { print "hacker\n"}
sub ::1 { _ print "another "}
sub ::0 { print "just " }
1->(%1->());
- or download this
sub :: { print "hacker\n"}
sub _ { print "perl "; ::->() }
sub ::1 { _ print "another "}
sub ::0 { print "just " }
1->(%1->());