my $outFileDirectory = "./bin"; if (-d @outFileDirectory ) { print "There is a directory --> " . $outFileDirectory . "\n" ; } else { print "There is a no such directory --> " . $outFileDirectory . "\n" ; } #### There is a no such directory --> ./bin #### use strict; use warnings; my $outFileDirectory = "./bin"; if (-d @outFileDirectory ) { print "There is a directory --> " . $outFileDirectory . "\n" ; } else { print "There is a no such directory --> " . $outFileDirectory . "\n" ; } #### Global symbol "@outFileDirectory" requires explicit package name at x.pl line 7. Execution of x.pl aborted due to compilation errors.