#script one $f1="X" x 200000; $f2=$f1; $f3=$f1; ... $f30=$f1; while (1) {sleep 1} #script two for (1..30) { $f{$_}="X" x 200000; } while (1) {sleep 1}