Help for this page
use 5.010; use warnings; use autodie; ... select STDOUT; }
use File::Slurp; $_ = read_file($ARGV[0] // $0); ... s/\x0d/<CR>/g, s/\x0a/<LF>/g; s/((?:<CR>)?<LF>)/$1\n/g; # Add real line breaks say;
www.com | www.net | www.org
No recent polls found