#!/usr/bin/env perl

sub get_form_data {
    my %args = @_;

    return {} unless ($args{to_utf8});

    return undef;
}

######

my $data = get_form_data(
    #to_utf8 => 1,
);

unless ($data) {
    print STDERR "Can't parse data\n";
}

exit 0;