$graph .= join( ", \\\n", map qq{"tmp/$random.dat" using 1:$_ title '$inputs[ $_ - 2 ]' with lines}, 2..$#inputs+2 );