Leser: 24
1 2 3 4 5 6 7 8 9 10
use warnings; use strict; for ( 32 .. 126 ) { my $str = "\\" . chr; my $esc = eval "'$str'"; print "$str => $esc" if $str ne $esc; } __END__ \' => ' \\ => \
1 2 3
@args = ("command", "arg1", "arg2"); system(@args) == 0 or die "system @args failed: $?"
1 2 3
@args = ("mentat","-path C:\\evo_crash","-pr cbody_glue.proc"); system(@args) == 0 or die "system @args failed: $?"
@args = ('mentat','-path', 'C:\evo_crash','-pr','cbody_glue.proc');