Select Code to Download

#!/usr/bin/perl
use strict;
...
line following the matching line
2nd line after the matching line
that has xyz <--- this is in @array