push  @{%Bad_Host_Rows->{dirname($row[1])}->{$row[0]}}, [@row];

##</code><code>##

row 0 = IP
row 1 = path
row 2 = date

##</code><code>##

$VAR1 = {'/testdir/1000/200' => { '12.123.12.12' => [ ['12.123.12.12', '/testdir/1000/200/index.php', '2004-05-25 00:33:30'],
['12.123.12.12', '/testdir/1000/200/index.php', '2004-05-25 00:33:31']] }};

$VAR1 = {'/testdir/1000/200' => { '12.123.12.12' => [ ['12.123.12.12', '/testdir/1000/200/index.php', '2004-05-25 00:33:34'],
['12.123.12.12', '/testdir/1000/200/index.php', '2004-05-25 00:33:34']]}};