[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [microsound] linux distribution for audi()



On Fri, 24 Aug 2001, Secret Agent Gel wrote:
> thank you for this. im in the proces of setting up my extra comp as a
> linux box to learn it, perl, php, server config, and pd. any and all
> advice at this stage is appreciated.

a good resource for linux + audio info: http://www.linuxdj.com/audio/lad/

i didn't see the original post that was dissing Perl, but i compose all my
music with Perl.  please don't be so rude about Perl.

#!/usr/bin/perl
        open(F,'>/dev/audio');$m='ub .  . quicksort techo .  . sl';
        while(){@d=sort{push@o,$a,$b;$a<=>$b}map{512-rand(1023)}0..
        1023;for(0..3){map{print F pack'C',$_;$m=~s{^(.)(.*)}{$2$1}
        ;printf"\e[%d;%dH$1",13.5-25*($_/1024),++$f%80+1}@o}}# yaxu

Perl is great.

alex