Help for this page
while (my $line = <SESAME>){ my ($tempa, $value, $tempb)= split m#</?CS_REFCLT>#, $line, 3; }
#!/usr/bin/perl ... my ($t, $elt)= @_; push @numbers, $elt->text(); }
www.com | www.net | www.org
No recent polls found
