Select Code to Download

while (<>) {
  push @data,$_; # adds $_ to the end of @data
}

while (<>) {
  @data = $_;
}