sub show {
    my $line = $_;
    ...
}