Grazus aterm

From wiki.perl.lt
Jump to: navigation, search
#!/usr/bin/perl
@color = qw(red green blue cyan);
exec 'aterm',qw(-fg green -tr -trsb),-tint => $color[rand @color],qw(-cr green -pr green -bd green +sb);

pvz:

Aterm screen.jpg

Personal tools
Categories