The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

GRICHTER / Embperl-3.0.1 / test / cmp / escraw.htm 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69

              
<html>
<head>
<title>Some tests for Embperl escaping</title>
</head>
<body>
$optRawInput  0
$escmode      0
'here is a \ '              -> here is a \ 
'here is a \\ '             -> here is a \ 
'here is a \\\ '            -> here is a \\ 
'here is a \\\\ '           -> here is a \\ 
'here is a <tag> '          -> here is a 
'here is a \<tag> '         -> here is a <tag>
'here is a \\<tag> '        -> here is a \<tag>
'here is a \\\<tag> '       -> here is a \<tag>
'here is a \\\\<tag> '      -> here is a \\<tag>
'here is a \<tag\> '        -> here is a <tag\>
'here is a \\<tag\\> '      -> here is a \<tag\>
'here is a \\\<tag\\\> '    -> here is a \<tag\\>
'here is a \\\\<tag\\\\> '  -> here is a \\<tag\\>
$optRawInput  1
$escmode      0
'here is a \ '              -> here is a \ 
'here is a \\ '             -> here is a \ 
'here is a \\\ '            -> here is a \\ 
'here is a \\\\ '           -> here is a \\ 
'here is a <tag> '          -> here is a <tag>
'here is a \<tag> '         -> here is a \<tag>
'here is a \\<tag> '        -> here is a \<tag>
'here is a \\\<tag> '       -> here is a \\<tag>
'here is a \\\\<tag> '      -> here is a \\<tag>
'here is a \<tag\> '        -> here is a \<tag\>
'here is a \\<tag\\> '      -> here is a \<tag\>
'here is a \\\<tag\\\> '    -> here is a \\<tag\\>
'here is a \\\\<tag\\\\> '  -> here is a \\<tag\\>
$optRawInput  0
$escmode      1
'here is a \ '              -> here is a  
'here is a \\ '             -> here is a  
'here is a \\\ '            -> here is a \ 
'here is a \\\\ '           -> here is a \ 
'here is a <tag> '          -> here is a 
'here is a \<tag> '         -> here is a &lt;tag&gt;
'here is a \\<tag> '        -> here is a <tag&gt;
'here is a \\\<tag> '       -> here is a <tag&gt;
'here is a \\\\<tag> '      -> here is a \&lt;tag&gt;
'here is a \<tag\> '        -> here is a &lt;tag>
'here is a \\<tag\\> '      -> here is a <tag>
'here is a \\\<tag\\\> '    -> here is a <tag\&gt;
'here is a \\\\<tag\\\\> '  -> here is a \&lt;tag\&gt;
$optRawInput  1
$escmode      1
'here is a \ '              -> here is a  
'here is a \\ '             -> here is a  
'here is a \\\ '            -> here is a \ 
'here is a \\\\ '           -> here is a \ 
'here is a <tag> '          -> here is a &lt;tag&gt;
'here is a \<tag> '         -> here is a <tag&gt;
'here is a \\<tag> '        -> here is a <tag&gt;
'here is a \\\<tag> '       -> here is a \&lt;tag&gt;
'here is a \\\\<tag> '      -> here is a \&lt;tag&gt;
'here is a \<tag\> '        -> here is a <tag>
'here is a \\<tag\\> '      -> here is a <tag>
'here is a \\\<tag\\\> '    -> here is a \&lt;tag\&gt;
'here is a \\\\<tag\\\\> '  -> here is a \&lt;tag\&gt;