Subversion Repositories wimsdev

Rev

Rev 11930 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 11930 Rev 11931
Line 1... Line 1...
1 
#!/usr/local/bin/perl
 1 
#!/usr/bin/perl
2 
use strict "vars";
 2 
use strict "vars";
3 
use strict "subs";
 3 
use strict "subs";
4 
use warnings;
 4 
use warnings;
5 
use Text::Balanced qw (extract_bracketed extract_tagged);
 5 
use Text::Balanced qw (extract_bracketed extract_tagged);
6 
my $tag='test';
 6 
my $tag='test';