while (<DATA>){
    chomp;
    print "$_\n";
}
__DATA__
one
two
three