Select Code to Download

open(DB, "</location/db.csv") || Error ('open','file');
while ($line = <DB>) {
...
  if ($from =~ /@split_sp_data[1]/) { print qq (<a href="$split_sp_dat
+a[0]">$split_sp_data[0]</a>); }
}
close(DB);