Help for this page

Select Code to Download

Select or download this

> perl
my @x=1..10;
...
print grep &check, @x;
__END__
13710