Select Code to Download

P:\test>p1
perl> use String::Approx qw[ adist ];;
...
print() on unopened filehandle VERSION at (eval 6) line 1, <STDIN> lin
+e 4.
perl> print $String::Approx::VERSION;;
3.19

#! perl -slw
use strict;
...
donor_dedupe_source : 13
indicted_video_source : 15
source1 : 1

P:\test>ppm
PPM - Programmer's Package Manager version 3.2.
...
donor_dedupe_source : 0.684210526315789
indicted_video_source : 0.714285714285714
source1 : 0.142857142857143

P:\test>perl -v

...
Complete documentation for Perl, including FAQ lists, should be found 
+on
this system using `man perl' or `perldoc perl'.  If you have access to
+ the
Internet, point your browser at http://www.perl.org/, the Perl Home Pa
+ge.