Help for this page

Select Code to Download

Select or download this
```
$in =~ /^([^\t]*\t[^\t]*)/;
$key = $1;
```