my @grafikoptionen = ($varoptionen[0], $varoptionen[1], $fixd, $varoptionen[2], $varoptionen[3], $fixm, $fixs); print "Grafikoptionen: @grafikoptionen\n\n" if $debug; my @sys_cmd = ("./graphic", "@grafikoptionen", "$refeingaben->{id}", ">$bild.png"); print STDERR "\n@sys_cmd\nwird gestartet\n" if $debug; system( "@sys_cmd" ) == 0 or die "$prog_name: Fehler: system( \"@sys_cmd\" ) gescheitert mit Rückgabewert $?\n";