Select Code to Download

my $line = '1|firstname|last, name|address1|city|state|zip';

...
}
my $csv = join ',' ,@stuff;
print $csv;