Select Code to Download

$   cp Cart.pl Cart.pm

#!/usr/bin/perl -w 
use strict;
...
|
| etc
|

package Cart;

...
}

1;

#!/usr/bin/perl -w 
use strict;
...
|
| etcetera...
|

use FindBin qw/ $Bin /;
use lib "$Bin";
| etc