Text this: Mastering algorithms with Perl /