30 lines
937 B
Awk
30 lines
937 B
Awk
|
BEGIN {
|
||
|
|
print print print print 10;
|
||
|
|
print (print 10 > "/tmp/should/not/be/creatable");
|
||
|
|
if ((print 10 > "/tmp/should/not/be/creatable") <= -1)
|
||
|
|
print "FAILURE";
|
||
|
|
else
|
||
|
|
print "SUCCESS";
|
||
|
|
|
||
|
|
print "------------------------------------";
|
||
|
|
a = 1 (print 10 > "/tmp/should/not/be/creatable");
|
||
|
|
print a;
|
||
|
|
print "------------------------------------";
|
||
|
|
b = ++a print 10;
|
||
|
|
printf "%d\n", b;
|
||
|
|
print "------------------------------------";
|
||
|
|
printf ("%d\n", b + (((print print print 30 + 50)) + 40));
|
||
|
|
print "------------------------------------";
|
||
|
|
printf ("%d\n", b + (((print print print 30 50)) + 40));
|
||
|
|
|
||
|
|
print "------------------------------------";
|
||
|
|
$(print 0 > "/dev/null") = "this is wonderful"; print $0;
|
||
|
|
print "------------------------------------";
|
||
|
|
$(getline dummy > "/dev/zero") = "that"; print $0;
|
||
|
|
|
||
|
|
print "------------------------------------";
|
||
|
|
x[0]=20; abc=(print ("hello", "world", (1, abc=20, abc=45))) in x; print abc
|
||
|
|
}
|
||
|
|
|
||
|
|
|