$filename = "$directory/$entry"; if( myExists( $filename, @mounts ) == 0 ){ push(@mounts, $filename); } sub myExists(){ my $compare = shift; foreach my $element (@_){ if( $element eq $compare ){ return 1; } } return 0; }