String Perl

print <Line 1
Line 2
Line 3
DONE