Select Code to Download

my @data;
open(FILE, "<$filename");
...
  push @data,$_ unless ($_ eq "\n");
}
close FILE;

xxxxxxx xxxxxxxx
xxxxxxxxx xxxxxx

xxxxxxx xxxxxxxx xxxxxxxxx xxxxxx