If you want to add each paragraph to the array, you'll want push or unshift:

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

If you want to replace the whole array with the single paragrah, you can do:

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

You would probably also benefit from reading perldata.