Help for this page
print $1 qq{\n}; $chain=$1; push @chains, $chain; #I want to extract the chains....A,B,C,D,E,F, +H,I,J,K,L
print "chain = $1\n"; push @chains, $1;
www.com | www.net | www.org
No recent polls found