*{'\' 
'}=sub{die 'just another perl hacker '};

##</code><code>##

bless&{'\'
'}
##</code><code>##

--
#!/usr/bin/perl
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}