Select Code to Download

...
dump { map { /(.+)\n/ => [ /^interesting line (.+?)$/mg ] }
...
dump { map { /(.+)/ => [ /^interesting line (.+)/mg ] }
       (split /^Index: /m)[1,-1] };
...

$ pm_golf_1038627.pl
{ "file1.txt" => [1, 2], "subdir/file2.txt" => ["A1", "A2"] }
{ "file1.txt" => [1, 2], "subdir/file2.txt" => ["A1", "A2"] }