my $file = "$dir/file.png"; open my $FH, ">", $file or die "could not open $file $!"; close $FH;