Select Code to Download

#!/usr/local/bin/perl

...
}

__END__

radix:~/tmp/section-lottery> cat data/sec.1.csv
sec1,1
...
"5678","3","sec3","sec5","sec4","sec3","sec1","sec2","section999"
"1234","2","sec3","sec1","sec3","sec5"
"5","2","section six","sec1","section six"