Select Code to Download

my $current_page = shift;
my @pages;
...
push @pages, $current_page;
$session->param( 'authorized_pages' => \@pages );
print redirect("/?page=$current_page");

print $session->header(-location => "/?page=$current_page");