if($file =~ //) { for ($x=0; $x < $1; $x++) { print F2 ""; } }