[ create a new paste ] login | about

Link: http://codepad.org/szlxWHXZ    [ raw code | output | fork ]

Perl, pasted on Aug 29: 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

package Foo;
sub foo {
    print "foo\n";
}
package ::Foo;
foo;


package Bar::::::;
sub bar {
    print "bar\n";
}
bar;


package main::main::main;
sub main {
    print "main\n";
}
package main;
main;


Output: 
1
2
3

foo
bar
main


Create a new paste based on this one


Comments: