Re: Needing a random number generator for scripting
On Thu, 27 Sep 2001, Dave Thayer wrote:
> On Thu, Sep 27, 2001 at 08:45:57PM -0500, Jeremy Whetzel wrote:
> >
> > I'm in the process of writing up a script that I need to be able to
> > "randomly" switch around the lines in a text file. (ala a random mp3
> > playlist) Would anyone have any suggestions? I was originally thinking
> > of using a random number generator for it, but if there's a tool that
> > would work better...?
> >
> Here's what I use:
>
> awk 'BEGIN {srand()} {print rand() "\t" $0 }' unshuffled.m3u \
> | sort | cut -f2 > shuffled.m3u
Here are 2 I use:
<== randline ==>
#!/usr/bin/perl
## print 1 randomline from a file
@_=<>;
print $_[rand$#_];
<== randomize ==>
#!/usr/bin/perl
## print a file in random order
while(<>) {
$_{$_}=0
}
foreach (keys%_) {
print
}
ie
~/bin$ cat ~/Playlists/Karma
/home/tony/.tmp/Delerium/Karma_Disk_1/01_Enchanted.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/02_Duende.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/03_Twilight.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/04_Silence.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/05_Forgotten_Worlds.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/06_Lamentation.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/07_Euphoria_firefly.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/08_Remembrance.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/09_Wisdom.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/10_Window_To_Your_Soul.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/11_Til_The_End_Of_Time.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/01_silence_sanctuary_mix.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/02_euphoria_firefly_rabbit_in_the_moons_divine_gothic_disco_mix.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/03_flowers_become_screens_frequency_modulation_mix.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/04_incantation_12_mix_edit.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/05_duende_bleak_desolation_mix.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/06_heavens_earth.mp3
~/bin$ randline ~/Playlists/Karma
/home/tony/.tmp/Delerium/Karma_Disk_1/05_Forgotten_Worlds.mp3
~/bin$ randline ~/Playlists/Karma
/home/tony/.tmp/Delerium/Karma_Disk_1/01_Enchanted.mp3
~/bin$ randomize ~/Playlists/Karma
/home/tony/.tmp/Delerium/Karma_Disk_2/04_incantation_12_mix_edit.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/06_Lamentation.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/11_Til_The_End_Of_Time.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/06_heavens_earth.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/07_Euphoria_firefly.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/05_duende_bleak_desolation_mix.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/05_Forgotten_Worlds.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/04_Silence.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/02_Duende.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/08_Remembrance.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/03_flowers_become_screens_frequency_modulation_mix.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/01_silence_sanctuary_mix.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/10_Window_To_Your_Soul.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/01_Enchanted.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/09_Wisdom.mp3
/home/tony/.tmp/Delerium/Karma_Disk_2/02_euphoria_firefly_rabbit_in_the_moons_divine_gothic_disco_mix.mp3
/home/tony/.tmp/Delerium/Karma_Disk_1/03_Twilight.mp3
Yours Tony.
/*
* "The significant problems we face cannot be solved at the
* same level of thinking we were at when we created them."
* --Albert Einstein
*/
Reply to: