Help for this page

Select Code to Download


  1. or download this
    package Number;
use strict;
...
}

1;
  2. or download this
    #!/usr/bin/env dvperl
use strict;
...
}

store $stuff, 'storefile';
  3. or download this
    #!/usr/bin/env dvperl
use strict;
...
    my $txt = $number->asText();
    print ("Key: ($key)\tNum: ($num)\tTxt: ($txt)\tObject: ($number)\n
+");
}