open my $fh, '>', '/dev/full' or die $!;
print $fh "Hello world!\n";
close $fh or die $!;