@echo off
perl wireworld.pl %1.wir