Try a slightly different global:
my @array = ( 1 .. 31 );
use List::Util qw(shuffle);
@array = shuffle(@array);
return { rand_31_variables => \@array }
}
<%DUMP rand_31_variables%>
Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
Code:
sub { my @array = ( 1 .. 31 );
use List::Util qw(shuffle);
@array = shuffle(@array);
return { rand_31_variables => \@array }
}
<%DUMP rand_31_variables%>
Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!