while ($_myfile[$i] !~ /filename="(.*)\.(.*)"){$args1=$1;$args2=$2;print $args2;$i++;}