@{$grep_lines{$filename}}= ARRAY(0x...)

my %grep_lines;

foreach $mk(@{ $grep_lines{ $filename } })
			 {
#doesnt enter the loop
}