use Wx::Perl::Dialog::Simple; my $response = entry( 'title' => "What's yer poison");