sub way {
  my $aa = shift;
  $aa->MethodCall(@_);
}

##</code><code>##

#$aa->MethodCall($main::a,$main::c);
# should be
#$aa->MethodCall($main::b,$main::c);
#                      ^^^