File: upside-down

package info (click to toggle)
filters 2.22
  • links: PTS
  • area: main
  • in suites: woody
  • size: 252 kB
  • ctags: 145
  • sloc: lex: 1,868; perl: 269; makefile: 81; sh: 6
file content (3 lines) | stat: -rwxr-xr-x 168 bytes parent folder | download | duplicates (9) 
1
2
3
 
#!/usr/bin/perl -pl-
$_=reverse lc$_;s@"@''@g;y/[]{A-R}<>()a-y1-9,!.?`'/][}        Joey Hess
{><)(eq)paj6y!fk7wuodbjsfn^mxhl2Eh59L86`i'%,/;s@k@>|@g#   joey@kitenet.net