Update infect.pl

Changed hardcoding of open 'map.vrs' to $mapfile