Help for this page

Select Code to Download

Select or download this

my $line = ( split "\n", $_ )[$wanted_line];

Select or download this
```
my ($line) = /^(.*?PATTERN.*?)$/ms;
```