eval'&'.join',&',split//,'JuSt_another_Perl_hacker.';sub AUTOLOAD{$
i++,($j,$k)=(sort keys%::)[$i,$i+1]until$j=~/ARGV/;${$k}=~s/^.*:://
;${$k}=~y/_S/ s/;print${$k}}