use strict;
use warnings;

print map { chomp; qq{$_ XX\n} } <DATA>;

__END__
line 1
line 2
line 3