email( {to=>$to, from => $email, ..., imgs => \@imgs} );
...

sub email {
    my ($vals) = @_;
    ...
    my $imgs = $vals->{ imgs } || [];
    ...

##</code><code>##

    my $to = $vals->{ to } || {};
    my $from = $vals->{ from } || {};
    my $subject = $vals->{ subject } || {};
    ...