~ubuntu-branches/ubuntu/gutsy/libmodule-info-perl/gutsy

« back to all changes in this revision

Viewing changes to t/lib/Foo.pm

  • Committer: Bazaar Package Importer
  • Author(s): Jay Bonci
  • Date: 2005-03-08 11:55:35 UTC
  • mfrom: (1.2.1 upstream) (2.1.1 hoary)
  • Revision ID: james.westby@ubuntu.com-20050308115535-8hcdm4hhazamhrch
Tags: 0.27-1
New upstream version

Show diffs side-by-side

added added

removed removed

Lines of Context:
38
38
    $Foo::obj = bless {};
39
39
    $Foo::obj->wibble(main::STDOUT);
40
40
}
 
41
my $_private = sub {
 
42
    wibble('call inside anonymous subroutine');
 
43
};
41
44
 
42
45
require 5.004;
43
46
use 5.004;
50
53
sub croak {
51
54
    require Carp;
52
55
    Carp::croak(@_);
 
56
 
 
57
    return sub {
 
58
        main::wibble('call insde anon sub inside sub');
 
59
        require 't/lib/NotHere.pm';
 
60
    }
53
61
}
54
62
 
55
63
BEGIN {