perl help required

hi
previously this program used to ask for user input to perform operation so
i have done the modifications but problem is that i have to create new file and redirect that file as input to this file and i want to avoid that so i made following modifications in program and i am not sure if its correct ( i dont hv perl compiler ) rather than redirecting input from other file, specify it as 1st argument and then inside program open that file read it and do the operation.

following is the code ::

my ($FILE) = "./$1" ;
open (FILE) or die "can`t open $FILE: $! \n";
my ($line1) = <FILE> ;
if (!($line1 =~ /^\d+$/)){
print "\n teller no must be an integer\n";
exit 0 ;
} else {
... do the specified thing.....
}

guys plz tell me which perl compiler i can use on windows to test my programs