so spake Asif Iqbal [2004.08.24 @ 23:04]: > Hi All > > Is there a cool list of links or archive where I can look for some color > themes? > > Thanks here, i call this theme random... heehee. :) ---------------------------------- #!/usr/bin/perl #wasting time before bed.... map { push @cols,"color$_" } (0..8); @objects=('attachment','bold','hdrdefault','body','indicator','markers', 'message','normal','quoted','quoted1','quoted2','quoted3','quoted4', 'search','signature','status','tilde','tree','underline'); @hdrs=('From','Subject','To','Cc','Bcc'); sub rnd {return $cols[int(rand($#cols))]} for(@objects) { print "color $_ ".&rnd.' '.&rnd; print(' "."') if /body/; print ';'} for(@hdrs){ print "color header ".&rnd.' '.&rnd." ^$_;";} ---------------------------------- now a :`filename` will give you a random look. ah...i love perl. -- *------------------------* // ste\/e || 0x44288D05 // *------------------------*
Attachment:
pgpwDdusm6ejj.pgp
Description: PGP signature