while ($outputFileName =~ /.*?\//g) { die "no dir: $`$&\n" unless -d "$`$&"; }