use strict;
use CGI;

my $q = CGI->new();

print "$q->param('foo')\n";     # wrong
print $q->param('foo'),"\n";    # right
print $q->param('foo')."\n";    # right
print "@{[$q->param('foo')]}\n" # right, but twisted ;)