use SymbolicMode; $realmode = SymbolicMode::mod ($mode, $file) or die "invalid mode: $mode\n";