Select Code to Download

#! perl -slw
use strict;
...
kill 2, $pid;

## do something with the 3 lines in @matches.