7 Einträge, 1 Seite |
1
2
3
4
5
6
7
8
9
10
use strict;
use warnings;
use Fcntl;
sysopen(STDOUT, './foo.bar', O_WRONLY | O_APPEND | O_CREAT) or die $!;
while (1) {
sleep 1;
print "Hello World\n" or die $!;
}
print("Hello World\n") or die $!;
print "Hello", " ", "World", "\n" or die $!
1
2
$ perl -MO=Deparse -e 'print "Hello", " ", "World", "\n" or die $!'
die $! unless print 'Hello', ' ', 'World', "\n";
7 Einträge, 1 Seite |