Extended for 'sky.fm' to find out 'ambient' is still on 'di.fm'.

[nethome.git] / bin / shuffle

#! /usr/bin/perl
# $Id$

use strict;
use warnings;

print splice(@ARGV,int(rand(@ARGV)),1)."\n" while @ARGV;