#!/usr/bin/perl -w #remove the -t auto part if you don't want automatic theme calls from E to Eterm $geometry = "80x27"; $name = "terminl"; $shade = 0xe6; $red = int(rand(257)); $green = int(rand(257)); $blue = int(rand(257)); $options = "-t auto -b black -f white --geometry $geometry --name $name --trans --cmod $shade --cmod-red $red --cmod-green $green --cmod-blue $blue -F shine"; exec( "Eterm $options &" )