I learned Perl initially for sysadmin'ing from Minimal Perl (http://www.amazon.com/Minimal-Perl-Unix-Linux-People/dp/1932...). It teach a subset of Perl necessary to use it as a more powerful replacement for awk/sed/grep/find, primarily with one-liners. By far the best bang/buck of any programming book I've ever read.