Help for this page

Select Code to Download


  1. or download this
    my $lat1 = Lat->new(4,8);
    my $lat2 = Lat->new(16,20);
    my $okay_sum = $lat1->add_latency($lat2); # this works
    my $failed_sum  = $lat1 + $lat2  # overloaded op, gets extra arg
    
  2. or download this
    package Lat;
    use Modern::Perl;
    ...
    Can't call method "min" without a package or object reference at test-
    +over2 line 21.
    1..4
    # Looks like your test exited with 2 just after 4.