Select Code to Download

open my $fh, ">/dev/full" or die "open: $!\n";
print $fh "abc\n" or die "print: $!\n";
close $fh or die "close: $!\n";

close: No space left on device