Commit | Line | Data |
6c30b273 |
1 | package CompileTime; |
2 | use strict; |
3 | use warnings; |
4 | |
5 | use Package::Stash; |
6 | |
7 | our $foo = 23; |
8 | |
9 | BEGIN { |
10 | my $stash = Package::Stash->new(__PACKAGE__); |
11 | $stash->add_symbol('$bar', $foo); |
12 | $stash->add_symbol('$baz', $stash->get_symbol('$foo')); |
13 | } |
14 | |
15 | 1; |