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