changeset 2 | 54cabdf79181 |
parent 1 | 82e2b6a853a7 |
1:82e2b6a853a7 | 2:54cabdf79181 |
---|---|
1 package Scalar::RefType; |
1 package Scalar::RefType; |
2 use strict; |
2 use strict; |
3 use warnings; |
3 use warnings; |
4 use Carp; |
4 use Carp; |
5 |
5 |
6 our $VERSION = '0.01'; |
6 our $VERSION = '0.02'; |
7 |
7 |
8 sub TIESCALAR { |
8 sub TIESCALAR { |
9 my ($class, $type) = @_; |
9 my ($class, $type) = @_; |
10 return bless { |
10 return bless { |
11 value => undef, |
11 value => undef, |