#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
$Data::Dumper::Useqq = 1;

my @lines = <>;
# bzw.
# my @lines = <DATA>;

print Dumper \@lines;