1. Perl

1.1. bench

I wrote this to make it easier to benchmark code snippets with the Benchmark module.

Usage: bench [-n iterations] [-i <init code>] 'name => {code}' ...

-n <iterations>	Number of iteration to run each code block
-i <init code>	Code to run before benchmarking the code blocks. Used to init global variables, etc.

Splits X-Chat log files into sperate logfiles, one for each date a "conversation" started on

Usage: splitlogs <prefix> <logfile(s)>

prefix	Prefix for new log file names
logfile(s)	List of log files to split up

Allows screen to inherit your ssh-agent so your screen sessions can use it

Usage: sscreen <normal screen options>

Shell scripts to control XMMS from the command line, also can be bound to keys.

Note: All xmms scripts require xmmsctrl. Xdialog is available here.

Name	Function	Requirements
xmms_cur_song	Display the current song	Xdialog
xmms_ff_song	Fast Forward 5 seconds
xmms_load_m3u	Load Playlist (Searches for .m3u files in ~/.xmms/)	Xdialog, perl
xmms_next_song	Skip to next song
xmms_play_pause	Play/Pause current song
xmms_prev_song	Skip to previous song
xmms_rew_song	Rewind 5 seconds
xmms_shuffle	Toggle Shuffle mode
xmms_stop_song	Stop current song
xmms_vol_down	Volume down 5%
xmms_vol_up	Volume up 5%

Note: If you have any questions, please contact me at paladin@techmonkeys.org

Last Modified: 29 April 2003