Perl fault ?

Sziasztok,
rendszer:
Ubuntu NetBook Remix
2.6.28-15-generic

Perl:
v5.10.0 built for i486-linux-gnu-thread-multi

A jelenség:
[0][0] mspike@EVE:~/Videók/BMX$ ls
list.txt mov1.flv mov2.flv mov3.flv mov4.flv mov5.flv mov6.flv
[0][0] mspike@EVE:~/Videók/BMX$ perl
if ( -e "mov1.flv" ) {
print "Working.\n";
} else {
print "Not Working... ??? \n";
} #Pressed CTRL-D here...
Not Working... ???