# the HTML
<input type="submit" name="option" value="first option">

# the Perl
use CGI;
my $q = CGI->new();
my $option = $q->query('option');