ワンライナーとは
2  

たった一行だけのプログラム

 perl -i~ -pe 's[(<img src="(\.\./)*)([a-z]+ball\.gif)][$1img/$3]g' *.html

 perl -i~ -pe 's/mgp0000(\d)/"mgp000" . sprintf("%02d", $1 + 12)/e'
      p6-3.obj

 perl -aF: -nle '$sh{$F[6]}++; END {print for sort keys %sh}'
      /etc/passwd

 ls -s *.png | perl -nle '$t += $_; END {print $t}'

 ruby -le 'print 2**128'