Select Code to Download

{
local $/ = undef;
$info = <DATA>;
}

use strict;
use warnings;
...
80: Tag <test> found
98: Tag <test> found
Tag <test> found

$VAR1 = '29';
$VAR2 = 'Tag <test> found';
...
$VAR26 = 'Tag <test> found';
$VAR27 = '5';
$VAR28 = 'Tag <test> found';