comparison _test/temp.pl @ 125:a4b0a819bbda

Small fixes in IMPL::DOM::Schema
author wizard
date Thu, 10 Jun 2010 17:43:51 +0400
parents 196bf443b5e1
children 44977efed303
comparison
equal deleted inserted replaced
124:e30bdd040fe3 125:a4b0a819bbda
1 #!/usr/bin/perl 1 #!/usr/bin/perl
2 use strict; 2 use strict;
3 3
4 my $var = " some stuff"; 4 my $var ;
5 5 $var->{dool} = '';
6 $var =~ tr/f/ome/;
7 print $var; 6 print $var;