Select Code to Download

#!/usr/local/bin/perl
use strict;
...
   }
   return $InVar;
}

Before Deletions:
$row: rowX   key0: val0    key1: val1    keyX: valX
...
$row: rowX   key0: val0    key1: val1    keyX: valX
$row: row9   key0: val0    key1: val1    keyX: valY
$row: row1   key0: val0    key1: val2    keyX: valX