#!C:\strawberry\perl\bin\perl.exe 
#use lib 'C:\strawberry\perl';
#use subs ;
…
	$line = remove_spaces($line);
…