use strict;
use CGI;
my $q = CGI->new;

my $good_method = "param";
my $bad_method = "param('foo')";
print $q->$good_method( 'foo' );
print $q->$bad_method;