yeah, also don't turn in something like this:
undef$/;for my$f{open IN,$f xor<IN>;s/(x)\1{2}/'g'x3/iegm;s/alpha/uc$1 +/egm;open OUT =>'>',($f eq'file1')?'sysbacks/file1':(($f eq'file2')?'alpha/file2':(( +$f eq 'file3' )?'gamma/blue':(($f=~/^file[45]$/)?'gamma/green':'/dev/null')))or die; +print OUT $_; }@ARGV;
Even if it works (which I didn't test), your prof will not give you a good grade for it.
In reply to Re: <> diamond Operator
by jonadab
in thread <> diamond Operator
by kocaweb
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |