print "something";
....
print " here the line ends\n";
....
print STDERR "and here something on stderr\n";

##</code><code>##

Getoptions(....);
# Set output record separator
$\="\r\n" if $dos_option;
$\="\n"   if $unix_option;
....

##</code><code>##

print "abc\n"