DZone Snippets: oneliner code

Generate 20 random passwords

willcodeforfoo () — Sun, 20 Aug 2006 11:03:38 GMT

< /dev/urandom tr -cd '[:print:]' | fold -w 15 | head -n 20

モジュールのパスを調べる

masaki (NAKAGAWA Masaki) — Tue, 03 Jan 2006 07:55:33 GMT



perldoc -ml Module::Name::Here

Change file name from upper to lower case

sjspig (S Spigarelli) — Sun, 04 Sep 2005 05:42:05 GMT

This script requires perl, and a modern shell with ls (this was written/tested using Bash). It also will not work recursively without some modifications.



for file in `ls -1|perl -ne 'print "$_" if (/[A-Z]/);'`

do

  mv ${file} `echo ${file}|perl -ne 'chomp;print "$_" if (tr/A-Z/a-z/);'`;

done

Oneliner - Print a File as Hex

beutelevision (Thomas Beutel) — Sat, 09 Apr 2005 06:09:27 GMT



perl -ne '@a=split"";for(@a){printf"%02x ",ord;print"\n"unless++$c % 20}' sample.txt