Help for this page
my($key,$value1,$value2,$value3) = $line =~ /(\w+),(\d+.\d+),(.\d+\s+\ +d+.\d+.)/g;
use strict; use warnings; ... close $outfile_1; exit 0;
www.com | www.net | www.org
No recent polls found
