Select Code to Download

#! /home/pete/CitrusPerl/perl/bin/perl
#
# LCDdisplay.pl
...
    $string =~ s/\.//g;
    return strlen($string);
}