##
post2web ( \%jobs, \%images );
...
sub post2Web {
my ( $jRef, $iRef ) = @_;
...
##
##
post2web ( { jobs => %jobs, images => %images } );
...
sub post2web (
my ( $Args ) = @_;
my $jRef = %{ $Args->[ jobs ] };
my $iRef = %{ $Args->[ images ] };
...