[% FOREACH s = [ 1 .. 5 ] %]
##
my $q = CGI->new;
my @floorplans = $CGI->param('floorplan_name');
# How many plans arrived?
my $num_plans = @floorplans;
# Looping over my plans
foreach my $plan ( @floorplans )
{
&do_the_plan( $plan )
}