Select Code to Download

#!/usr/bin/perl
use strict;
...
        }
        print scalar(@opt_args), "\n";
}

main::(foo.pl:6):       test_args(Set::Scalar->new());
                                                                      
+                         DB<0> s
...
                                                                      
+                         DB<0> s
Set::Scalar::Base::size(/Library/Perl/5.8.6/Set/Scalar/Base.pm:122):
122:        my $self = shift;