perl ImportTest.pl
Bareword found in conditional at ImportTest.pl line 7.
debug: x is 123