Help for this page

Select Code to Download

Select or download this

my $aa=x();
foreach(@$aa){
...
        push(@ret,$b);
        return(\@ret);
}