Help for this page

Select Code to Download

Select or download this

my @names = (
    [ qw/Jim     12/ ],
...
for ( grep { $_->[0] eq $name } @names ) {
    print "@$_\n";
}

Select or download this
```
Jim's in the list
Jim 12
Jim 57
```