use CGI;
print a( {-href=>"dummy" }, \@list );

##</code><code>##

Global symbol "$list" requires explicit package name at ...

##</code><code>##

print table( Tr( td( a( {-href=>"dummy"}, \@list ) ) ) ) );