Help for this page

Select Code to Download

Select or download this

my @arr1 = split/\n/,$var;
print "@arr1\n";
chomp(@arr1);
print "@arr1\n";