sub whatever {
    my $scalar = shift;
    my %hash   = @_;
}