use Data::Dump qw( pp ); # some code here print pp \@ip; chomp(@ip); print pp \@ip;