Perl Snippets

 Name                    Last modified      Size  Description
 Parent Directory                             -   
 db8_update              2017-07-01 10:19  2.1K  Update records in DB822 format with minimal changes (previously update_db)
 putfile                 2002-12-05 10:23  185   Rewrite a file with new text
 update_db               2017-07-01 10:20   24   Renamed to db8_update
 read_db                 2017-06-30 23:26   22   Renamed to db8_read
 rm_recursively.pl       2003-01-07 13:56  1.0K  Recursive remove of files
 db8_read                2017-07-01 10:19  1.0K  Read records in DB822 format (previously read_db)
 random_choose           2008-10-30 07:19  718   Randomly chooses n elements without repetition and returns them
 htmlquote               2012-12-23 10:39  264   Quotes HTML metacharacters
 appendfile              2003-05-06 15:00  191   Open file, append text, close file
 getfile                 2002-11-29 08:43  181   Get file contents into a variable
 get_new_filename        2007-07-03 10:53  1.1K  Finds a new file name using suggested name or prefix
 options                 2002-12-30 12:17  1.5K  Example of options analysis
 encode_w                2005-07-27 16:54  435   Encode any string into a \w+ string (identifier)
 encode_S                2005-07-27 16:53  5.3K  Encode any string into a \S+ string (non-whitespace)
 decode_w                2005-07-27 16:54  206   Decode string from encode_w encoded (inverse)
 decode_S                2005-07-27 16:53  793   Decode string from encode_S encoded (inverse)
 DB822.txt               2017-07-01 10:19  5.6K  DB822 Data Format Description
 encodex                 2002-12-02 13:59  203   A way of making non-printable chars printable
 db8_read_simple         2017-07-01 10:19  827   A very simple implementation of db8_read
 weekday_to_digits       2003-09-03 16:48  446   
 union                   2003-03-20 15:48  347   
 toString                2003-05-09 12:54  1.3K  
 regex-uri               2004-07-08 15:03  1.2K  
 randomize-array         2006-01-20 07:19  119   
 random_sequence         2007-01-25 13:58  337   
 quoted-printable        2004-03-12 08:12  179   
 month_to_digits         2003-09-02 15:55  628   
 locking_files           2013-02-10 08:24  2.2K  
 intersection            2003-03-20 15:48  401   
 check_keys              2003-03-20 14:04  440   
 Readme.txt              2017-07-01 10:06  161