Gentoo Forums
Gentoo Forums
Gentoo Forums
Quick Search: in
cool perl script for random tints w/ aterm (8 lines)
View unanswered posts
View posts from last 24 hours

 
Reply to topic    Gentoo Forums Forum Index Desktop Environments
View previous topic :: View next topic  
Author Message
destatnj2
n00b
n00b


Joined: 26 Oct 2002
Posts: 4

PostPosted: Sat Nov 02, 2002 11:04 am    Post subject: cool perl script for random tints w/ aterm (8 lines) Reply with quote

Here's a nice little script that will choose a random tint color each time you run aterm.

Code:

#!/usr/bin/perl -w
use strict;

my @color = qw(green blue yellow magenta);

exec 'aterm',
  qw(-bg black -fg white -vb -sl 1500 -fn 8x13 -geometry 105x48 +sb -bw 0 -tr),
  -tint => $color[rand @color];


have fun!
_________________
<insert clever text here>
Back to top
View user's profile Send private message
Display posts from previous:   
Reply to topic    Gentoo Forums Forum Index Desktop Environments All times are GMT
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum