Perl – 301 redirects for .htaccess

my @pages = (1 .. 85);

for my $i (@pages) {
print “RewriteRule ^2008_page$i.shtml$ “”http://www.example.com/2008.php?page=$i” [R=301,L]n”;
}