Mercurial > pub > Impl

comparison _test/temp.pl @ 104:196bf443b5e1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
DOM::Schema RC0 inflators support, validation and some other things, Minor and major fixes almost for everything. A 'Source' property of the ValidationErrors generated from a NodeSet or a NodeList is subject to change in the future.
author wizard
date Tue, 11 May 2010 02:42:59 +0400
parents cf3b6ef2be22
children a4b0a819bbda
comparison
equal deleted inserted replaced
103:c289ed9662ca 104:196bf443b5e1
1 #!/usr/bin/perl 1 #!/usr/bin/perl
2 use strict; 2 use strict;
3 3
4 local $@; 4 my $var = " some stuff";
5 5
6 { 6 $var =~ tr/f/ome/;
7 eval 'die "boolshit"'; 7 print $var;
8 my $e = $@;
9
10 die "msg: $e" if $e;
11 }