use strict;
use warnings;
use diagnostics;

sub meth1 {
   my $var1 = shift || 0;
   my $var2 = shift || 0;
   return $var1 if $var1 > $var2;
   return $var2;
}

sub meth2 {
  my ($var1, $var2) = @_;
  # Do we need to do this all the time?
  # $var1 ||= 0;
  # $var2 ||= 0;
  return $var1 if $var1 > $var2;
  return $var2;
}