| Refresh | Home EGTry.com

perl - chomp

remove newline

perl code

$line1="a line\n";
chomp($line1);
print "#$line1#\n";

Output

#a line#

assign and remove newline

perl code

chomp($line2="line2\n");
print "#$line2#\n";

Output

#line2#

chomp list

perl code

@list=("line A\n", "line B\n");
chomp(@list);
print "#", $list[1], "#", "\n";

Output

#line B#