![[1]](https://svalko.org/data/2008_12_05_23_06_344103_1.gif){kind=link}
прикольно :)
#!/usr/bin/perl -w
$\='`'|"'";$\++;$;='/'|'`';$;++;$;++;$;++;$,=$;;$,++;$/=$,;$/++;$:=$/;$:++;$_=
'%'|'`';$_.='`'|'#';$_.=$\;$_.='`'|'/';$_.=$".'"';$_.='@'|'*'&~'!';$_.="$:$,$/"
.$";$_.='`'|'!';$_.='`'|'.';$_.='/'|'`';$_.=$/.$\;$_.='%'|'`';$_.=$;.$";$_.='@'
|':'&~'*';$_.='`'|'%';$_.=$;;$_.='`'|',';$_.=$".$\;$_.='`'|'!';$_.='#'|'`';$_.=
'+'|'`';$_.='`'|'%';$_.=$;.'"'.$".'>&';$_.=$,&':';`$_`;
если бы она rm от корня делала, то постить бы не стал - я поке еще не такой ублюдок :)
программка выводит на экран: Just another Perl hacker.