#!/usr/bin/eperl -mc a d a

[img+txt]
[info]
[credits]
[live]

 
; close (DATA); print ($r[int(rand $n)]); !>
 
[hi tech version?]