ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Devel-FindRef/t/01_padarray.t
Revision: 1.1
Committed: Fri May 16 06:41:37 2014 UTC (10 years ago) by root
Content type: application/x-troff
Branch: MAIN
CVS Tags: rel-1_46, rel-1_44, rel-1_45, rel-1_43, HEAD
Log Message: 
*** empty log message ***

File Contents

# Content
1 BEGIN { $| = 1; print "1..1\n"; }
2
3 use Devel::FindRef;
4
5 sub xx {
6 \my $x
7 }
8
9 my $y = xx;
10
11 Devel::FindRef::track $y;
12
13 print "ok 1\n";