Select Code to Download

sub FOREIGNBUILDARGS { return @{$_[2]}}

use MyMVR;

...
print $_ ."\n" foreach (@{$a - $b});
print $a->dist($b) . "\n";