print $query->startform();
in
print $query->startform(-method=>'GET');
[download]