Patterns

# perl -e 'use MIME::Base64; print encode_base64('mystring');'

find . -type f | xargs perl -pi -w -e ’s/iso-8859-1/UTF-8/g;’

# add newline every 60 characters

$var =~ s/(.{60})(?!n)/$1n/g if ($var);

perl -e 'for ($i=1; $i < = 120; $i++) { $ret = `touch -t 20040816
1000 file$i` }'

Bottom line: You need to recompile Perl with ‘-lcl’ and ‘-lpthread’ switches.

http://dbi.perl.org/
itrc forum
itrc forum #2
bottom line

After unpacking perl source you can build it with
$ sh Configure -des -Dprefix=/opt/local/perl- -Uinstallusrbinperl -A prepend:libswanted=’cl pthread ‘
$ make
$ make test
# make install