1<!DOCTYPE html> 2<html lang="en"> 3<head> 4<meta charset="UTF-8"> 5<title>sampleFile - OpenGrok cross reference for /sampleFile</title></head><body> 6<a class="l" name="1" href="#1">1</a><span class="c">#!/<a href="/source/s?path=/usr/">usr</a>/<a href="/source/s?path=/usr/bin/">bin</a>/<a href="/source/s?path=/usr/bin/perl">perl</a></span> 7<a class="l" name="2" href="#2">2</a> 8<a class="l" name="3" href="#3">3</a><span class="c">#</span> 9<a class="l" name="4" href="#4">4</a><span class="c"># CDDL HEADER START</span> 10<a class="l" name="5" href="#5">5</a><span class="c">#</span> 11<a class="l" name="6" href="#6">6</a><span class="c"># The contents of this file are subject to the terms of the</span> 12<a class="l" name="7" href="#7">7</a><span class="c"># Common Development and Distribution License (the "License").</span> 13<a class="l" name="8" href="#8">8</a><span class="c"># You may not use this file except in compliance with the License.</span> 14<a class="l" name="9" href="#9">9</a><span class="c">#</span> 15<a class="hl" name="10" href="#10">10</a><span class="c"># See <a href="/source/s?path=LICENSE.txt">LICENSE.txt</a> included in this distribution for the specific</span> 16<a class="l" name="11" href="#11">11</a><span class="c"># language governing permissions and limitations under the License.</span> 17<a class="l" name="12" href="#12">12</a><span class="c">#</span> 18<a class="l" name="13" href="#13">13</a><span class="c"># When distributing Covered Code, include this CDDL HEADER in each</span> 19<a class="l" name="14" href="#14">14</a><span class="c"># file and include the License file at <a href="/source/s?path=LICENSE.txt">LICENSE.txt</a>.</span> 20<a class="l" name="15" href="#15">15</a><span class="c"># If applicable, add the following below this CDDL HEADER, with the</span> 21<a class="l" name="16" href="#16">16</a><span class="c"># fields enclosed by brackets "[]" replaced with your own identifying</span> 22<a class="l" name="17" href="#17">17</a><span class="c"># information: Portions Copyright [yyyy] [name of copyright owner]</span> 23<a class="l" name="18" href="#18">18</a><span class="c">#</span> 24<a class="l" name="19" href="#19">19</a><span class="c"># CDDL HEADER END</span> 25<a class="hl" name="20" href="#20">20</a><span class="c">#</span> 26<a class="l" name="21" href="#21">21</a> 27<a class="l" name="22" href="#22">22</a><span class="c">#</span> 28<a class="l" name="23" href="#23">23</a><span class="c"># Copyright (c) 2010, 2016, Oracle <a href="/source/s?path=and/">and</a>/<a href="/source/s?path=and/or">or</a> its affiliates. All rights reserved.</span> 29<a class="l" name="24" href="#24">24</a><span class="c"># Portions Copyright (c) 2017, Chris Fraire <cfraire@me.com>.</span> 30<a class="l" name="25" href="#25">25</a><span class="c">#</span> 31<a class="l" name="26" href="#26">26</a> 32<a class="l" name="27" href="#27">27</a><b>use</b> <b>warnings</b>; 33<a class="l" name="28" href="#28">28</a> 34<a class="l" name="29" href="#29">29</a> <b>use</b> <a href="/source/s?defs=DBI" class="intelliWindow-symbol" data-definition-place="undefined-in-file">DBI</a>; 35<a class="hl" name="30" href="#30">30</a> 36<a class="l" name="31" href="#31">31</a> <b>my</b> $<a href="/source/s?defs=database" class="intelliWindow-symbol" data-definition-place="undefined-in-file">database</a>=<span class="s">'dbi:DB2:sample'</span>; 37<a class="l" name="32" href="#32">32</a> <b>my</b> $<a href="/source/s?defs=user" class="intelliWindow-symbol" data-definition-place="undefined-in-file">user</a>=<span class="s">''</span>; 38<a class="l" name="33" href="#33">33</a> <b>my</b> $<a href="/source/s?defs=password" class="intelliWindow-symbol" data-definition-place="undefined-in-file">password</a>=<span class="s">''</span>; 39<a class="l" name="34" href="#34">34</a> 40<a class="l" name="35" href="#35">35</a> <b>my</b> $<a href="/source/s?defs=dbh" class="intelliWindow-symbol" data-definition-place="undefined-in-file">dbh</a> = <a href="/source/s?defs=DBI" class="intelliWindow-symbol" data-definition-place="undefined-in-file">DBI</a>-><b>connect</b>($<a href="/source/s?defs=database" class="intelliWindow-symbol" data-definition-place="undefined-in-file">database</a>, $<a href="/source/s?defs=user" class="intelliWindow-symbol" data-definition-place="undefined-in-file">user</a>, $<a href="/source/s?defs=password" class="intelliWindow-symbol" data-definition-place="undefined-in-file">password</a>) 41<a class="l" name="36" href="#36">36</a> <b>or</b> <b>die</b> <span class="s">"Can't connect to $<a href="/source/s?defs=database" class="intelliWindow-symbol" data-definition-place="undefined-in-file">database</a>: $<a href="/source/s?defs=DBI" class="intelliWindow-symbol" data-definition-place="undefined-in-file">DBI</a>::errstr"</span>; 42<a class="l" name="37" href="#37">37</a> 43<a class="l" name="38" href="#38">38</a> <b>my</b> $<a href="/source/s?defs=sth" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sth</a> = $<a href="/source/s?defs=dbh" class="intelliWindow-symbol" data-definition-place="undefined-in-file">dbh</a>-><a href="/source/s?defs=prepare" class="intelliWindow-symbol" data-definition-place="undefined-in-file">prepare</a>( 44<a class="l" name="39" href="#39">39</a> <b>q</b><span class="s">{ SELECT firstnme, lastname</span> 45<a class="hl" name="40" href="#40">40</a><span class="s"> FROM employee }</span> 46<a class="l" name="41" href="#41">41</a> ) 47<a class="l" name="42" href="#42">42</a> <b>or</b> <b>die</b> <span class="s">"Can't prepare statement: $<a href="/source/s?defs=DBI" class="intelliWindow-symbol" data-definition-place="undefined-in-file">DBI</a>::errstr"</span>; 48<a class="l" name="43" href="#43">43</a> 49<a class="l" name="44" href="#44">44</a> <b>my</b> $<a href="/source/s?defs=rc" class="intelliWindow-symbol" data-definition-place="undefined-in-file">rc</a> = $<a href="/source/s?defs=sth" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sth</a>-><a href="/source/s?defs=execute" class="intelliWindow-symbol" data-definition-place="undefined-in-file">execute</a> 50<a class="l" name="45" href="#45">45</a> <b>or</b> <b>die</b> <span class="s">"Can't execute statement: $<a href="/source/s?defs=DBI" class="intelliWindow-symbol" data-definition-place="undefined-in-file">DBI</a>::errstr"</span>; 51<a class="l" name="46" href="#46">46</a> 52<a class="l" name="47" href="#47">47</a> <b>print</b> <span class="s">"Query will return $<a href="/source/s?defs=sth" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sth</a>->{NUM_OF_FIELDS} fields.\n\n"</span>; 53<a class="l" name="48" href="#48">48</a> <b>print</b> <span class="s">"$<a href="/source/s?defs=sth" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sth</a>->{NAME}->[0]: $<a href="/source/s?defs=sth" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sth</a>->{NAME}->[1]\n"</span>; 54<a class="l" name="49" href="#49">49</a> 55<a class="hl" name="50" href="#50">50</a> <b>while</b> (($<a href="/source/s?defs=firstnme" class="intelliWindow-symbol" data-definition-place="undefined-in-file">firstnme</a>, $<a href="/source/s?defs=lastname" class="intelliWindow-symbol" data-definition-place="undefined-in-file">lastname</a>) = $<a href="/source/s?defs=sth" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sth</a>-><a href="/source/s?defs=fetchrow" class="intelliWindow-symbol" data-definition-place="undefined-in-file">fetchrow</a>()) { 56<a class="l" name="51" href="#51">51</a> <b>print</b> <span class="s">"$<a href="/source/s?defs=firstnme" class="intelliWindow-symbol" data-definition-place="undefined-in-file">firstnme</a>: $<a href="/source/s?defs=lastname" class="intelliWindow-symbol" data-definition-place="undefined-in-file">lastname</a>\n"</span>; 57<a class="l" name="52" href="#52">52</a> } 58<a class="l" name="53" href="#53">53</a> 59<a class="l" name="54" href="#54">54</a> <span class="c"># check for problems which may have terminated the fetch early</span> 60<a class="l" name="55" href="#55">55</a> <b>warn</b> $<a href="/source/s?defs=DBI" class="intelliWindow-symbol" data-definition-place="undefined-in-file">DBI</a>::<a href="/source/s?defs=errstr" class="intelliWindow-symbol" data-definition-place="undefined-in-file">errstr</a> <b>if</b> $<a href="/source/s?defs=DBI" class="intelliWindow-symbol" data-definition-place="undefined-in-file">DBI</a>::<b>err</b>; 61<a class="l" name="56" href="#56">56</a> 62<a class="l" name="57" href="#57">57</a> $<a href="/source/s?defs=sth" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sth</a>-><a href="/source/s?defs=finish" class="intelliWindow-symbol" data-definition-place="undefined-in-file">finish</a>; 63<a class="l" name="58" href="#58">58</a> $<a href="/source/s?defs=dbh" class="intelliWindow-symbol" data-definition-place="undefined-in-file">dbh</a>-><a href="/source/s?defs=disconnect" class="intelliWindow-symbol" data-definition-place="undefined-in-file">disconnect</a>; 64<a class="l" name="59" href="#59">59</a> 65<a class="hl" name="60" href="#60">60</a><span class="c">=item snazzle($) 66<a class="l" name="61" href="#61">61</a> 67<a class="l" name="62" href="#62">62</a>The snazzle() function will behave in the most spectacular 68<a class="l" name="63" href="#63">63</a>form that you can possibly imagine, not even excepting 69<a class="l" name="64" href="#64">64</a>cybernetic pyrotechnics. 70<a class="l" name="65" href="#65">65</a> 71<a class="l" name="66" href="#66">66</a>=cut back to the compiler, nuff of this pod stuff!</span> 72<a class="l" name="67" href="#67">67</a> 73<a class="l" name="68" href="#68">68</a><b>sub</b> <a href="/source/s?defs=snazzle" class="intelliWindow-symbol" data-definition-place="undefined-in-file">snazzle</a>($) { 74<a class="l" name="69" href="#69">69</a><b>my</b> $<a href="/source/s?defs=thingie" class="intelliWindow-symbol" data-definition-place="undefined-in-file">thingie</a> = <b>shift</b>; 75<a class="hl" name="70" href="#70">70</a>} 76<a class="l" name="71" href="#71">71</a> 77<a class="l" name="72" href="#72">72</a><b>my</b> $<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a>; 78<a class="l" name="73" href="#73">73</a>$<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a>=<span class="n">12345</span>; <span class="c"># integer</span> 79<a class="l" name="74" href="#74">74</a>$<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a>=-<span class="n">54321</span>; <span class="c"># negative integer</span> 80<a class="l" name="75" href="#75">75</a>$<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a>=<span class="n">12345.67</span>; <span class="c"># floating point</span> 81<a class="l" name="76" href="#76">76</a>$<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a>=<span class="n">6.02E23</span>; <span class="c"># scientific notation</span> 82<a class="l" name="77" href="#77">77</a>$<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a>=<span class="n">0xffff</span>; <span class="c"># hexadecimal</span> 83<a class="l" name="78" href="#78">78</a>$<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a>=<span class="n">0377</span>; <span class="c"># octal</span> 84<a class="l" name="79" href="#79">79</a>$<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a>=<span class="n">4_294_967_296</span>; <span class="c"># underline for legibility</span> 85<a class="hl" name="80" href="#80">80</a> 86<a class="l" name="81" href="#81">81</a><span class="c">#</span> 87<a class="l" name="82" href="#82">82</a><span class="c"># The following should be marked-up in the same manner as for all sigiled</span> 88<a class="l" name="83" href="#83">83</a><span class="c"># identifiers.</span> 89<a class="l" name="84" href="#84">84</a><span class="c">#</span> 90<a class="l" name="85" href="#85">85</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>; 91<a class="l" name="86" href="#86">86</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = \$<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>; 92<a class="l" name="87" href="#87">87</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = ${<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>}; 93<a class="l" name="88" href="#88">88</a> 94<a class="l" name="89" href="#89">89</a><span class="c">#</span> 95<a class="hl" name="90" href="#90">90</a><span class="c"># include "<<EOF" examples from</span> 96<a class="l" name="91" href="#91">91</a><span class="c"># <a href="https://perldoc.perl.org/perlop.html#Quote-and-Quote-like-Operators">https://perldoc.perl.org/perlop.html#Quote-and-Quote-like-Operators</a></span> 97<a class="l" name="92" href="#92">92</a><span class="c">#</span> 98<a class="l" name="93" href="#93">93</a> 99<a class="l" name="94" href="#94">94</a><b>print</b> <<EOF;<span class="s"></span> 100<a class="l" name="95" href="#95">95</a><span class="s">The price is $<a href="/source/s?defs=Price" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Price</a>.</span> 101<a class="l" name="96" href="#96">96</a><span class="s"></span>EOF 102<a class="l" name="97" href="#97">97</a><b>print</b> << "EOF"; <span class="c"># same as above</span><span class="s"></span> 103<a class="l" name="98" href="#98">98</a><span class="s">The price is $<a href="/source/s?defs=Price" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Price</a>.</span> 104<a class="l" name="99" href="#99">99</a><span class="s"></span>EOF 105<a class="hl" name="100" href="#100">100</a> 106<a class="l" name="101" href="#101">101</a><b>my</b> $<a href="/source/s?defs=cost" class="intelliWindow-symbol" data-definition-place="undefined-in-file">cost</a> = <<'VISTA'; <span class="c"># hasta la ...</span><span class="s"></span> 107<a class="l" name="102" href="#102">102</a><span class="s">That'll be $10 please, ma'am.</span> 108<a class="l" name="103" href="#103">103</a><span class="s"></span>VISTA 109<a class="l" name="104" href="#104">104</a>$<a href="/source/s?defs=cost" class="intelliWindow-symbol" data-definition-place="undefined-in-file">cost</a> = <<\VISTA; <span class="c"># Same thing!</span><span class="s"></span> 110<a class="l" name="105" href="#105">105</a><span class="s">That'll be $10 please, ma'am.</span> 111<a class="l" name="106" href="#106">106</a><span class="s"></span>VISTA 112<a class="l" name="107" href="#107">107</a> 113<a class="l" name="108" href="#108">108</a><b>print</b> << `EOC`; <span class="c"># execute command and get results</span><span class="s"></span> 114<a class="l" name="109" href="#109">109</a><span class="s">echo hi there</span> 115<a class="hl" name="110" href="#110">110</a><span class="s"></span>EOC 116<a class="l" name="111" href="#111">111</a> 117<a class="l" name="112" href="#112">112</a><b>if</b> ($<a href="/source/s?defs=some_var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">some_var</a>) { 118<a class="l" name="113" href="#113">113</a> <b>print</b> <<~EOF;<span class="s"></span> 119<a class="l" name="114" href="#114">114</a><span class="s"> This is a here-doc</span> 120<a class="l" name="115" href="#115">115</a><span class="s"></span> EOF 121<a class="l" name="116" href="#116">116</a>} 122<a class="l" name="117" href="#117">117</a> 123<a class="l" name="118" href="#118">118</a><b>print</b> <<~EOF;<span class="s"></span> 124<a class="l" name="119" href="#119">119</a><span class="s"> This text is not indented</span> 125<a class="hl" name="120" href="#120">120</a><span class="s"> This text is indented with two spaces</span> 126<a class="l" name="121" href="#121">121</a><span class="s"> This text is indented with two tabs</span> 127<a class="l" name="122" href="#122">122</a><span class="s"></span>EOF 128<a class="l" name="123" href="#123">123</a> 129<a class="l" name="124" href="#124">124</a><b>print</b> <<~ 'EOF';<span class="s"></span> 130<a class="l" name="125" href="#125">125</a><span class="s"> This text is not indented</span> 131<a class="l" name="126" href="#126">126</a><span class="s"> This text is indented with two spaces</span> 132<a class="l" name="127" href="#127">127</a><span class="s"> This text is indented with two tabs</span> 133<a class="l" name="128" href="#128">128</a><span class="s"></span>EOF 134<a class="l" name="129" href="#129">129</a> 135<a class="hl" name="130" href="#130">130</a><b>print</b> <<"foo", <<"bar"; <span class="c"># you can stack them</span><span class="s"></span> 136<a class="l" name="131" href="#131">131</a><span class="s">I said foo.</span> 137<a class="l" name="132" href="#132">132</a><span class="s"></span>foo<span class="s"></span> 138<a class="l" name="133" href="#133">133</a><span class="s">I said bar.</span> 139<a class="l" name="134" href="#134">134</a><span class="s"></span>bar 140<a class="l" name="135" href="#135">135</a> 141<a class="l" name="136" href="#136">136</a><a href="/source/s?defs=myfunc" class="intelliWindow-symbol" data-definition-place="undefined-in-file">myfunc</a>(<< "THIS", <span class="n">23</span>, <<'THAT');<span class="s"></span> 142<a class="l" name="137" href="#137">137</a><span class="s">Here's a line or</span> 143<a class="l" name="138" href="#138">138</a><span class="s">two</span> 144<a class="l" name="139" href="#139">139</a><span class="s"></span>THIS<span class="s"></span> 145<a class="hl" name="140" href="#140">140</a><span class="s">and here's another.</span> 146<a class="l" name="141" href="#141">141</a><span class="s"></span>THAT 147<a class="l" name="142" href="#142">142</a> 148<a class="l" name="143" href="#143">143</a><span class="c">#</span> 149<a class="l" name="144" href="#144">144</a><span class="c"># Include some samples for the shortcut // syntax of m//</span> 150<a class="l" name="145" href="#145">145</a><span class="c">#</span> 151<a class="l" name="146" href="#146">146</a> 152<a class="l" name="147" href="#147">147</a>$<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a> =~ <span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span> && <b>print</b>; 153<a class="l" name="148" href="#148">148</a>$<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a> !~<span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span> && <b>print</b>; 154<a class="l" name="149" href="#149">149</a><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span> && <b>print</b>; 155<a class="hl" name="150" href="#150">150</a>(<span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>) && <b>print</b>; 156<a class="l" name="151" href="#151">151</a><b>if</b> (<span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>) { <b>print</b>; } 157<a class="l" name="152" href="#152">152</a><b>if</b> (<span class="n">1</span> && <span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>) { <b>print</b>; } 158<a class="l" name="153" href="#153">153</a><b>if</b> (<span class="n">0</span> || <span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>) { <b>print</b>; } 159<a class="l" name="154" href="#154">154</a><b>print</b> <b>or</b><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>; 160<a class="l" name="155" href="#155">155</a><b>print</b> <b>if</b> <span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>; 161<a class="l" name="156" href="#156">156</a><b>print</b> <b>unless</b> 162<a class="l" name="157" href="#157">157</a> 163<a class="l" name="158" href="#158">158</a> 164<a class="l" name="159" href="#159">159</a> <span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>; 165<a class="hl" name="160" href="#160">160</a> 166<a class="l" name="161" href="#161">161</a><b>my</b> @<a href="/source/s?defs=o" class="intelliWindow-symbol" data-definition-place="undefined-in-file">o</a> = $<a href="/source/s?defs=contents" class="intelliWindow-symbol" data-definition-place="undefined-in-file">contents</a> =~ 167<a class="l" name="162" href="#162">162</a> 168<a class="l" name="163" href="#163">163</a> 169<a class="l" name="164" href="#164">164</a> <span class="s">/^(?>\S+) \s* := \s* LINKSRC \s* = \s* \S+/</span>mxg; 170<a class="l" name="165" href="#165">165</a> 171<a class="l" name="166" href="#166">166</a><b>foreach</b> <b>my</b> $<a href="/source/s?defs=v" class="intelliWindow-symbol" data-definition-place="undefined-in-file">v</a> (@<a href="/source/s?defs=o" class="intelliWindow-symbol" data-definition-place="undefined-in-file">o</a>) { <span class="c"># This loop shouldn't mistakenly be inside the previous m//</span> 172<a class="l" name="167" href="#167">167</a> <b>print</b> $<a href="/source/s?defs=v" class="intelliWindow-symbol" data-definition-place="undefined-in-file">v</a>; 173<a class="l" name="168" href="#168">168</a>} 174<a class="l" name="169" href="#169">169</a> 175<a class="hl" name="170" href="#170">170</a><span class="c">#</span> 176<a class="l" name="171" href="#171">171</a><span class="c"># The following table is from</span> 177<a class="l" name="172" href="#172">172</a><span class="c"># <a href="https://perldoc.perl.org/perlop.html#Quote-and-Quote-like-Operators">https://perldoc.perl.org/perlop.html#Quote-and-Quote-like-Operators</a> .</span> 178<a class="l" name="173" href="#173">173</a><span class="c"># The samples following are generated per the table.</span> 179<a class="l" name="174" href="#174">174</a><span class="c">#</span> 180<a class="l" name="175" href="#175">175</a><span class="c"># Customary Generic Meaning Interpolates</span> 181<a class="l" name="176" href="#176">176</a><span class="c"># '' q{} Literal no</span> 182<a class="l" name="177" href="#177">177</a><span class="c"># "" qq{} Literal yes</span> 183<a class="l" name="178" href="#178">178</a><span class="c"># `` qx{} Command yes*</span> 184<a class="l" name="179" href="#179">179</a><span class="c"># qw{} Word list no</span> 185<a class="hl" name="180" href="#180">180</a><span class="c"># // m{} Pattern match yes*</span> 186<a class="l" name="181" href="#181">181</a><span class="c"># qr{} Pattern yes*</span> 187<a class="l" name="182" href="#182">182</a><span class="c"># s{}{} Substitution yes*</span> 188<a class="l" name="183" href="#183">183</a><span class="c"># tr{}{} Transliteration no (but see below)</span> 189<a class="l" name="184" href="#184">184</a><span class="c"># y{}{}</span> 190<a class="l" name="185" href="#185">185</a><span class="c">#</span> 191<a class="l" name="186" href="#186">186</a> 192<a class="l" name="187" href="#187">187</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <span class="s">'pP \"\'\(\)\<\>\{\}\[\]\/\# et $var.'</span>; 193<a class="l" name="188" href="#188">188</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>q</b><span class="s">{pP {{nest}}\"\'\(\)\<\>\[\]\/\# et $var.}</span>; 194<a class="l" name="189" href="#189">189</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>q</b><span class="s">[pP [[nest]]\"\'\(\)\<\>\{\}\/\# et $var.]</span>; 195<a class="hl" name="190" href="#190">190</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>q</b><span class="s">(pP ((nest))\"\'\<\>\{\}\[\]\/\# et $var.)</span>; 196<a class="l" name="191" href="#191">191</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>q</b><span class="s"><pP <<nest>>\"\'\(\)\{\}\[\]\/\# et $var.></span>; 197<a class="l" name="192" href="#192">192</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>q</b><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $var./</span>; 198<a class="l" name="193" href="#193">193</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>q</b><span class="s"> zpP \"\'\(\)\<\>\{\}\[\]\/\# et $var.z</span>; 199<a class="l" name="194" href="#194">194</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>q</b><span class="s">#pP \"\'\(\)\<\>\{\}\[\]\/\# et $var.#</span>; 200<a class="l" name="195" href="#195">195</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>q</b><span class="s">'pP \"\'\(\)\<\>\{\}\[\]\/\# et $var.'</span>; 201<a class="l" name="196" href="#196">196</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>q</b><span class="s">"pP \"\'\(\)\<\>\{\}\[\]\/\# et $var."</span>; 202<a class="l" name="197" href="#197">197</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <span class="s">"pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>."</span>; 203<a class="l" name="198" href="#198">198</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qq</b><span class="s">{pP {{nest}}\"\'\(\)\<\>\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.}</span>; 204<a class="l" name="199" href="#199">199</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qq</b><span class="s">[pP [[nest]]\"\'\(\)\<\>\{\}\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.]</span>; 205<a class="hl" name="200" href="#200">200</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qq</b><span class="s">(pP ((nest))\"\'\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.)</span>; 206<a class="l" name="201" href="#201">201</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qq</b><span class="s"><pP <<nest>>\"\'\(\)\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.></span>; 207<a class="l" name="202" href="#202">202</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qq</b><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>; 208<a class="l" name="203" href="#203">203</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qq</b><span class="s"> zpP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.z</span>; 209<a class="l" name="204" href="#204">204</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qq</b><span class="s">#pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.#</span>; 210<a class="l" name="205" href="#205">205</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qq</b><span class="s">'pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.'</span>; 211<a class="l" name="206" href="#206">206</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qq</b><span class="s">"pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>."</span>; 212<a class="l" name="207" href="#207">207</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <span class="s">`pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.`</span>; 213<a class="l" name="208" href="#208">208</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qx</b><span class="s">{pP {{nest}}\"\'\(\)\<\>\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.}</span>; 214<a class="l" name="209" href="#209">209</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qx</b><span class="s">[pP [[nest]]\"\'\(\)\<\>\{\}\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.]</span>; 215<a class="hl" name="210" href="#210">210</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qx</b><span class="s">(pP ((nest))\"\'\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.)</span>; 216<a class="l" name="211" href="#211">211</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qx</b><span class="s"><pP <<nest>>\"\'\(\)\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.></span>; 217<a class="l" name="212" href="#212">212</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qx</b><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>; 218<a class="l" name="213" href="#213">213</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qx</b><span class="s"> zpP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.z</span>; 219<a class="l" name="214" href="#214">214</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qx</b><span class="s">#pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.#</span>; 220<a class="l" name="215" href="#215">215</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qx</b><span class="s">'pP \"\'\(\)\<\>\{\}\[\]\/\# et $var.'</span>; 221<a class="l" name="216" href="#216">216</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qx</b><span class="s">"pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>."</span>; 222<a class="l" name="217" href="#217">217</a><b>use</b> <b>vars</b> <b>qw</b><span class="s">{$<a href="/source/s?defs=Cannot" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Cannot</a> %<a href="/source/s?defs=embed" class="intelliWindow-symbol" data-definition-place="undefined-in-file">embed</a> &<a href="/source/s?defs=punctuation" class="intelliWindow-symbol" data-definition-place="undefined-in-file">punctuation</a> *<a href="/source/s?defs=here" class="intelliWindow-symbol" data-definition-place="undefined-in-file">here</a> @<a href="/source/s?defs=except" class="intelliWindow-symbol" data-definition-place="undefined-in-file">except</a> $<a href="/source/s?defs=sigils" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sigils</a>}</span>; 223<a class="l" name="218" href="#218">218</a><b>use</b> <b>vars</b> <b>qw</b><span class="s">[$<a href="/source/s?defs=Cannot" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Cannot</a> %<a href="/source/s?defs=embed" class="intelliWindow-symbol" data-definition-place="undefined-in-file">embed</a> &<a href="/source/s?defs=punctuation" class="intelliWindow-symbol" data-definition-place="undefined-in-file">punctuation</a> *<a href="/source/s?defs=here" class="intelliWindow-symbol" data-definition-place="undefined-in-file">here</a> @<a href="/source/s?defs=except" class="intelliWindow-symbol" data-definition-place="undefined-in-file">except</a> $<a href="/source/s?defs=sigils" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sigils</a>]</span>; 224<a class="l" name="219" href="#219">219</a><b>use</b> <b>vars</b> <b>qw</b><span class="s">($<a href="/source/s?defs=Cannot" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Cannot</a> %<a href="/source/s?defs=embed" class="intelliWindow-symbol" data-definition-place="undefined-in-file">embed</a> &<a href="/source/s?defs=punctuation" class="intelliWindow-symbol" data-definition-place="undefined-in-file">punctuation</a> *<a href="/source/s?defs=here" class="intelliWindow-symbol" data-definition-place="undefined-in-file">here</a> @<a href="/source/s?defs=except" class="intelliWindow-symbol" data-definition-place="undefined-in-file">except</a> $<a href="/source/s?defs=sigils" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sigils</a>)</span>; 225<a class="hl" name="220" href="#220">220</a><b>use</b> <b>vars</b> <b>qw</b><span class="s"><$<a href="/source/s?defs=Cannot" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Cannot</a> %<a href="/source/s?defs=embed" class="intelliWindow-symbol" data-definition-place="undefined-in-file">embed</a> &<a href="/source/s?defs=punctuation" class="intelliWindow-symbol" data-definition-place="undefined-in-file">punctuation</a> *<a href="/source/s?defs=here" class="intelliWindow-symbol" data-definition-place="undefined-in-file">here</a> @<a href="/source/s?defs=except" class="intelliWindow-symbol" data-definition-place="undefined-in-file">except</a> $<a href="/source/s?defs=sigils" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sigils</a>></span>; 226<a class="l" name="221" href="#221">221</a><b>use</b> <b>vars</b> <b>qw</b><span class="s">/$<a href="/source/s?defs=Cannot" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Cannot</a> %<a href="/source/s?defs=embed" class="intelliWindow-symbol" data-definition-place="undefined-in-file">embed</a> &<a href="/source/s?defs=punctuation" class="intelliWindow-symbol" data-definition-place="undefined-in-file">punctuation</a> *<a href="/source/s?defs=here" class="intelliWindow-symbol" data-definition-place="undefined-in-file">here</a> @<a href="/source/s?defs=except" class="intelliWindow-symbol" data-definition-place="undefined-in-file">except</a> $<a href="/source/s?defs=sigils" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sigils</a>/</span>; 227<a class="l" name="222" href="#222">222</a><b>use</b> <b>vars</b> <b>qw</b><span class="s"> z$<a href="/source/s?defs=Cannot" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Cannot</a> %<a href="/source/s?defs=embed" class="intelliWindow-symbol" data-definition-place="undefined-in-file">embed</a> &<a href="/source/s?defs=punctuation" class="intelliWindow-symbol" data-definition-place="undefined-in-file">punctuation</a> *<a href="/source/s?defs=here" class="intelliWindow-symbol" data-definition-place="undefined-in-file">here</a> @<a href="/source/s?defs=except" class="intelliWindow-symbol" data-definition-place="undefined-in-file">except</a> $<a href="/source/s?defs=sigils" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sigils</a>z</span>; 228<a class="l" name="223" href="#223">223</a><b>use</b> <b>vars</b> <b>qw</b><span class="s">#$<a href="/source/s?defs=Cannot" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Cannot</a> %<a href="/source/s?defs=embed" class="intelliWindow-symbol" data-definition-place="undefined-in-file">embed</a> &<a href="/source/s?defs=punctuation" class="intelliWindow-symbol" data-definition-place="undefined-in-file">punctuation</a> *<a href="/source/s?defs=here" class="intelliWindow-symbol" data-definition-place="undefined-in-file">here</a> @<a href="/source/s?defs=except" class="intelliWindow-symbol" data-definition-place="undefined-in-file">except</a> $<a href="/source/s?defs=sigils" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sigils</a>#</span>; 229<a class="l" name="224" href="#224">224</a><b>use</b> <b>vars</b> <b>qw</b><span class="s">'$<a href="/source/s?defs=Cannot" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Cannot</a> %<a href="/source/s?defs=embed" class="intelliWindow-symbol" data-definition-place="undefined-in-file">embed</a> &<a href="/source/s?defs=punctuation" class="intelliWindow-symbol" data-definition-place="undefined-in-file">punctuation</a> *<a href="/source/s?defs=here" class="intelliWindow-symbol" data-definition-place="undefined-in-file">here</a> @<a href="/source/s?defs=except" class="intelliWindow-symbol" data-definition-place="undefined-in-file">except</a> $<a href="/source/s?defs=sigils" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sigils</a>'</span>; 230<a class="l" name="225" href="#225">225</a><b>use</b> <b>vars</b> <b>qw</b><span class="s">"$<a href="/source/s?defs=Cannot" class="intelliWindow-symbol" data-definition-place="undefined-in-file">Cannot</a> %<a href="/source/s?defs=embed" class="intelliWindow-symbol" data-definition-place="undefined-in-file">embed</a> &<a href="/source/s?defs=punctuation" class="intelliWindow-symbol" data-definition-place="undefined-in-file">punctuation</a> *<a href="/source/s?defs=here" class="intelliWindow-symbol" data-definition-place="undefined-in-file">here</a> @<a href="/source/s?defs=except" class="intelliWindow-symbol" data-definition-place="undefined-in-file">except</a> $<a href="/source/s?defs=sigils" class="intelliWindow-symbol" data-definition-place="undefined-in-file">sigils</a>"</span>; 231<a class="l" name="226" href="#226">226</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>; 232<a class="l" name="227" href="#227">227</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>m</b><span class="s">{pP {{nest}}\"\'\(\)\<\>\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.}</span>; 233<a class="l" name="228" href="#228">228</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>m</b><span class="s">[pP [[nest]]\"\'\(\)\<\>\{\}\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.]</span>; 234<a class="l" name="229" href="#229">229</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>m</b><span class="s">(pP ((nest))\"\'\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.)</span>; 235<a class="hl" name="230" href="#230">230</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>m</b><span class="s"><pP <<nest>>\"\'\(\)\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.></span>; 236<a class="l" name="231" href="#231">231</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>m</b><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>; 237<a class="l" name="232" href="#232">232</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>m</b><span class="s"> zpP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.z</span>; 238<a class="l" name="233" href="#233">233</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>m</b><span class="s">#pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.#</span>; 239<a class="l" name="234" href="#234">234</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>m</b><span class="s">'pP \"\'\(\)\<\>\{\}\[\]\/\# et $var.'</span>; 240<a class="l" name="235" href="#235">235</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>m</b><span class="s">"pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>."</span>; 241<a class="l" name="236" href="#236">236</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qr</b><span class="s">{pP {{nest}}\"\'\(\)\<\>\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.}</span>; 242<a class="l" name="237" href="#237">237</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qr</b><span class="s">[pP [[nest]]\"\'\(\)\<\>\{\}\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.]</span>; 243<a class="l" name="238" href="#238">238</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qr</b><span class="s">(pP ((nest))\"\'\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.)</span>; 244<a class="l" name="239" href="#239">239</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qr</b><span class="s"><pP <<nest>>\"\'\(\)\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.></span>; 245<a class="hl" name="240" href="#240">240</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qr</b><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>; 246<a class="l" name="241" href="#241">241</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qr</b><span class="s"> zpP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.z</span>; 247<a class="l" name="242" href="#242">242</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qr</b><span class="s">#pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.#</span>; 248<a class="l" name="243" href="#243">243</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qr</b><span class="s">'pP \"\'\(\)\<\>\{\}\[\]\/\# et $var.'</span>; 249<a class="l" name="244" href="#244">244</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>qr</b><span class="s">"pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>."</span>; 250<a class="l" name="245" href="#245">245</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>s</b><span class="s">{pP {{nest}}\"\'\(\)\<\>\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.</span> 251<a class="l" name="246" href="#246">246</a><span class="s"> }{pP {{nest}}\"\'\(\)\<\>\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.}</span>x; 252<a class="l" name="247" href="#247">247</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>s</b><span class="s">[pP [[nest]]\"\'\(\)\<\>\{\}\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.</span> 253<a class="l" name="248" href="#248">248</a><span class="s"> ][pP [[nest]]\"\'\(\)\<\>\{\}\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.]</span>x; 254<a class="l" name="249" href="#249">249</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>s</b><span class="s">(pP ((nest))\"\'\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.</span> 255<a class="hl" name="250" href="#250">250</a><span class="s"> )(pP ((nest))\"\'\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.)</span>x; 256<a class="l" name="251" href="#251">251</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>s</b><span class="s"><pP <<nest>>\"\'\(\)\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.</span> 257<a class="l" name="252" href="#252">252</a><span class="s"> ><pP <<nest>>\"\'\(\)\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.></span>x; 258<a class="l" name="253" href="#253">253</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>s</b><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span> 259<a class="l" name="254" href="#254">254</a><span class="s"> pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>./</span>x; 260<a class="l" name="255" href="#255">255</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>s</b><span class="s"> zpP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.z</span> 261<a class="l" name="256" href="#256">256</a><span class="s"> pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.z</span>x; 262<a class="l" name="257" href="#257">257</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>s</b><span class="s">#pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.#</span> 263<a class="l" name="258" href="#258">258</a><span class="s"> pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>.#</span>x; 264<a class="l" name="259" href="#259">259</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>s</b><span class="s">'pP \"\'\(\)\<\>\{\}\[\]\/\# et $var.'</span> 265<a class="hl" name="260" href="#260">260</a><span class="s"> pP \"\'\(\)\<\>\{\}\[\]\/\# et $var.'</span>x; 266<a class="l" name="261" href="#261">261</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>s</b><span class="s">"pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>."</span> 267<a class="l" name="262" href="#262">262</a><span class="s"> pP \"\'\(\)\<\>\{\}\[\]\/\# et $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>."</span>x; 268<a class="l" name="263" href="#263">263</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>tr</b><span class="s">{pP \"\'\(\)\<\>\[\]\/\# fin.}{pP \"\'\(\)\<\>\[\]\/\# fin.}</span>; 269<a class="l" name="264" href="#264">264</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>tr</b><span class="s">[pP \"\'\(\)\<\>\{\}\/\# fin.][pP \"\'\(\)\<\>\{\}\/\# fin.]</span>; 270<a class="l" name="265" href="#265">265</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>tr</b><span class="s">(pP \"\'\<\>\{\}\[\]\/\# fin.)(pP \"\'\<\>\{\}\[\]\/\# fin.)</span>; 271<a class="l" name="266" href="#266">266</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>tr</b><span class="s"><pP \"\'\(\)\{\}\[\]\/\# fin.><pP \"\'\(\)\{\}\[\]\/\# fin.></span>; 272<a class="l" name="267" href="#267">267</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>tr</b><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# fin./pP \"\'\(\)\<\>\{\}\[\]\/\# fin./</span>; 273<a class="l" name="268" href="#268">268</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>tr</b><span class="s"> zpP \"\'\(\)\<\>\{\}\[\]\/\# fin.zpP \"\'\(\)\<\>\{\}\[\]\/\# fin.z</span>; 274<a class="l" name="269" href="#269">269</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>tr</b><span class="s">#pP \"\'\(\)\<\>\{\}\[\]\/\# fin.#pP \"\'\(\)\<\>\{\}\[\]\/\# fin.#</span>; 275<a class="hl" name="270" href="#270">270</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>tr</b><span class="s">'pP \"\'\(\)\<\>\{\}\[\]\/\# fin.'pP \"\'\(\)\<\>\{\}\[\]\/\# fin.'</span>; 276<a class="l" name="271" href="#271">271</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>tr</b><span class="s">"pP \"\'\(\)\<\>\{\}\[\]\/\# fin."pP \"\'\(\)\<\>\{\}\[\]\/\# fin."</span>; 277<a class="l" name="272" href="#272">272</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>y</b><span class="s">{pP \"\'\(\)\<\>\[\]\/\# fin.}{pP \"\'\(\)\<\>\[\]\/\# fin.}</span>; 278<a class="l" name="273" href="#273">273</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>y</b><span class="s">[pP \"\'\(\)\<\>\{\}\/\# fin.][pP \"\'\(\)\<\>\{\}\/\# fin.]</span>; 279<a class="l" name="274" href="#274">274</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>y</b><span class="s">(pP \"\'\<\>\{\}\[\]\/\# fin.)(pP \"\'\<\>\{\}\[\]\/\# fin.)</span>; 280<a class="l" name="275" href="#275">275</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>y</b><span class="s"><pP \"\'\(\)\{\}\[\]\/\# fin.><pP \"\'\(\)\{\}\[\]\/\# fin.></span>; 281<a class="l" name="276" href="#276">276</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>y</b><span class="s">/pP \"\'\(\)\<\>\{\}\[\]\/\# fin./pP \"\'\(\)\<\>\{\}\[\]\/\# fin./</span>; 282<a class="l" name="277" href="#277">277</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>y</b><span class="s"> zpP \"\'\(\)\<\>\{\}\[\]\/\# fin.zpP \"\'\(\)\<\>\{\}\[\]\/\# fin.z</span>; 283<a class="l" name="278" href="#278">278</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>y</b><span class="s">#pP \"\'\(\)\<\>\{\}\[\]\/\# fin.#pP \"\'\(\)\<\>\{\}\[\]\/\# fin.#</span>; 284<a class="l" name="279" href="#279">279</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>y</b><span class="s">'pP \"\'\(\)\<\>\{\}\[\]\/\# fin.'pP \"\'\(\)\<\>\{\}\[\]\/\# fin.'</span>; 285<a class="hl" name="280" href="#280">280</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = <b>y</b><span class="s">"pP \"\'\(\)\<\>\{\}\[\]\/\# fin."pP \"\'\(\)\<\>\{\}\[\]\/\# fin."</span>; 286<a class="l" name="281" href="#281">281</a> 287<a class="l" name="282" href="#282">282</a><span class="c"># more sigiled identifier tests</span> 288<a class="l" name="283" href="#283">283</a><b>print</b> <span class="s">"$<a href="/source/s?defs=abc" class="intelliWindow-symbol" data-definition-place="undefined-in-file">abc</a>\n${<a href="/source/s?defs=abc" class="intelliWindow-symbol" data-definition-place="undefined-in-file">abc</a>}\n"</span>, <span class="s">'$abc\n${abc}\n'</span>, <span class="s">"\n"</span>; 289<a class="l" name="284" href="#284">284</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = $ {<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>}; 290<a class="l" name="285" href="#285">285</a>$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a> = ${ <a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a> }; 291<a class="l" name="286" href="#286">286</a><b>print</b> <b>qr</b><span class="s"> z$<a href="/source/s?defs=abc" class="intelliWindow-symbol" data-definition-place="undefined-in-file">abc</a>z</span>ix, <span class="s">"\n"</span>; 292<a class="l" name="287" href="#287">287</a><b>print</b> <b>$0</b> <b>if</b> <b>$!</b>; 293<a class="l" name="288" href="#288">288</a><b>print</b> <b>$^V</b>; 294<a class="l" name="289" href="#289">289</a><b>print</b> <span class="s">"<b>${^GLOBAL_PHASE}</b> is what?"</span>; 295<a class="hl" name="290" href="#290">290</a> 296<a class="l" name="291" href="#291">291</a><span class="c"># more quote-like tests</span> 297<a class="l" name="292" href="#292">292</a><b>qr</b><span class="s">{\.[a-z]+$}</span>i; 298<a class="l" name="293" href="#293">293</a> 299<a class="l" name="294" href="#294">294</a><span class="c"># should back to YYINITIAL after HERE document</span> 300<a class="l" name="295" href="#295">295</a><b>print</b> <<EOF;<span class="s"></span> 301<a class="l" name="296" href="#296">296</a><span class="s"> Some text</span> 302<a class="l" name="297" href="#297">297</a><span class="s"></span>EOF 303<a class="l" name="298" href="#298">298</a><span class="s">/\b sentinel \b/</span> && <b>print</b>; <span class="c"># This should heuristically match as m//</span> 304<a class="l" name="299" href="#299">299</a> 305<a class="hl" name="300" href="#300">300</a><span class="c"># spaced sigil</span> 306<a class="l" name="301" href="#301">301</a>$ <a href="/source/s?defs=svar" class="intelliWindow-symbol" data-definition-place="undefined-in-file">svar</a> = <span class="n">1</span>; 307<a class="l" name="302" href="#302">302</a> 308<a class="l" name="303" href="#303">303</a><span class="c"># more quote-like tests</span> 309<a class="l" name="304" href="#304">304</a><b>s</b><span class="s">{\.[a-z]+$}{no}</span>i; 310<a class="l" name="305" href="#305">305</a><b>my</b> $<a href="/source/s?defs=a" class="intelliWindow-symbol" data-definition-place="undefined-in-file">a</a> = <b>qr</b><span class="s">$abc$</span>ix; 311<a class="l" name="306" href="#306">306</a> 312<a class="l" name="307" href="#307">307</a><span class="c"># more POD tests</span> 313<a class="l" name="308" href="#308">308</a>=cut for no purpose 314<a class="l" name="309" href="#309">309</a><b>print</b> <span class="s">"1\n"</span>; 315<a class="hl" name="310" href="#310">310</a> 316<a class="l" name="311" href="#311">311</a><span class="c"># POD odd case</span> 317<a class="l" name="312" href="#312">312</a><span class="c">=ITEM fubar($) 318<a class="l" name="313" href="#313">313</a>=CUT back -- not really though 319<a class="l" name="314" href="#314">314</a>n0n{(sense] 320<a class="l" name="315" href="#315">315</a>=cut back really</span> 321<a class="l" name="316" href="#316">316</a><b>print</b> <span class="s">"1\n"</span>; 322<a class="l" name="317" href="#317">317</a> 323<a class="l" name="318" href="#318">318</a><span class="c"># format FORMLIST tests</span> 324<a class="l" name="319" href="#319">319</a><b> format</b> STDOUT =<span class="s"></span> 325<a class="hl" name="320" href="#320">320</a><span class="s">@<<<<<< @|||||| @>>>>>></span> 326<a class="l" name="321" href="#321">321</a><span class="s"></span><span class="c"># comment <args to follow></span> 327<a class="l" name="322" href="#322">322</a><span class="s">"left", substr($<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>, 0, 2), "\$right"</span> 328<a class="l" name="323" href="#323">323</a><span class="s"> ...</span> 329<a class="l" name="324" href="#324">324</a><span class="s"> print</span> 330<a class="l" name="325" href="#325">325</a><span class="s">.</span> 331<a class="l" name="326" href="#326">326</a><b>print</b> <span class="s">"1\n"</span>; 332<a class="l" name="327" href="#327">327</a> 333<a class="l" name="328" href="#328">328</a><span class="c"># some tests for syntax near "s" characters</span> 334<a class="l" name="329" href="#329">329</a><b>my</b> $<a href="/source/s?defs=this" class="intelliWindow-symbol" data-definition-place="undefined-in-file">this</a> = {}; 335<a class="hl" name="330" href="#330">330</a><b>if</b> (! -s $<a href="/source/s?defs=this" class="intelliWindow-symbol" data-definition-place="undefined-in-file">this</a>->{<a href="/source/s?defs=filename" class="intelliWindow-symbol" data-definition-place="undefined-in-file">filename</a>}) { 336<a class="l" name="331" href="#331">331</a> <b>open</b> <a href="/source/s?defs=UCFILE" class="intelliWindow-symbol" data-definition-place="undefined-in-file">UCFILE</a>, <span class="s">"create_file -s $<a href="/source/s?defs=this" class="intelliWindow-symbol" data-definition-place="undefined-in-file">this</a>->{start} -e $<a href="/source/s?defs=this" class="intelliWindow-symbol" data-definition-place="undefined-in-file">this</a>->{end} |"</span> <b>or</b> <b>exit</b> <span class="n">0</span>; 337<a class="l" name="332" href="#332">332</a>} <b>else</b> { 338<a class="l" name="333" href="#333">333</a> <b>open</b> <a href="/source/s?defs=UCFILE" class="intelliWindow-symbol" data-definition-place="undefined-in-file">UCFILE</a>, <span class="s">"$<a href="/source/s?defs=this" class="intelliWindow-symbol" data-definition-place="undefined-in-file">this</a>->{filename}"</span> <b>or</b> <b>exit</b> <span class="n">0</span>; 339<a class="l" name="334" href="#334">334</a>} 340<a class="l" name="335" href="#335">335</a> 341<a class="l" name="336" href="#336">336</a><span class="c"># more quote-like tests</span> 342<a class="l" name="337" href="#337">337</a><b>my</b> $<a href="/source/s?defs=KK" class="intelliWindow-symbol" data-definition-place="undefined-in-file">KK</a> = <span class="s">"b"</span>; 343<a class="l" name="338" href="#338">338</a>$<a href="/source/s?defs=bref" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bref</a> = {<span class="s">'b'</span> => <span class="n">5</span>}; 344<a class="l" name="339" href="#339">339</a>%<a href="/source/s?defs=bhash" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bhash</a> = (<span class="s">'b'</span> => <span class="n">6</span>); 345<a class="hl" name="340" href="#340">340</a>{ <b>print</b> $<a href="/source/s?defs=bref" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bref</a> -> {$<a href="/source/s?defs=KK" class="intelliWindow-symbol" data-definition-place="undefined-in-file">KK</a>} / $<a href="/source/s?defs=bhash" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bhash</a> { $<a href="/source/s?defs=KK" class="intelliWindow-symbol" data-definition-place="undefined-in-file">KK</a> }, <span class="s">"$<a href="/source/s?defs=bref" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bref</a>->{$<a href="/source/s?defs=KK" class="intelliWindow-symbol" data-definition-place="undefined-in-file">KK</a>} $<a href="/source/s?defs=bhash" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bhash</a>{$<a href="/source/s?defs=KK" class="intelliWindow-symbol" data-definition-place="undefined-in-file">KK</a>} $<a href="/source/s?defs=b" class="intelliWindow-symbol" data-definition-place="undefined-in-file">b</a> {\n"</span>; } 346<a class="l" name="341" href="#341">341</a>$<a href="/source/s?defs=bref" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bref</a>->{<b>int</b>} = -<span class="n">1</span> * $<a href="/source/s?defs=bref" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bref</a>->{<b>int</b>} / $<a href="/source/s?defs=bref" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bref</a>->{<a href="/source/s?defs=a_rate" class="intelliWindow-symbol" data-definition-place="undefined-in-file">a_rate</a>}; <span class="c"># do not infer a m//</span> 347<a class="l" name="342" href="#342">342</a>$<a href="/source/s?defs=bref" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bref</a>->{<span class="s">"int"</span>} = -<span class="n">1</span> * $<a href="/source/s?defs=bref" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bref</a>->{<span class="s">"int"</span>} / $<a href="/source/s?defs=bref" class="intelliWindow-symbol" data-definition-place="undefined-in-file">bref</a>->{<span class="s">"a_rate"</span>}; <span class="c"># do not infer a m//</span> 348<a class="l" name="343" href="#343">343</a>$<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a> = <b>qq</b><span class="s">[select t.col</span> 349<a class="l" name="344" href="#344">344</a><span class="s"> from $<a href="/source/s?defs=table" class="intelliWindow-symbol" data-definition-place="undefined-in-file">table</a></span> 350<a class="l" name="345" href="#345">345</a><span class="s"> where key = $<a href="/source/s?defs=k" class="intelliWindow-symbol" data-definition-place="undefined-in-file">k</a></span> 351<a class="l" name="346" href="#346">346</a><span class="s"> and k1 = "$<a href="/source/s?defs=r" class="intelliWindow-symbol" data-definition-place="undefined-in-file">r</a>->[0]->[0]"</span> 352<a class="l" name="347" href="#347">347</a><span class="s"> and k2 = "$<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a>->{ code }->{ v }"</span> 353<a class="l" name="348" href="#348">348</a><span class="s"> and k3 = "$<a href="/source/s?defs=t" class="intelliWindow-symbol" data-definition-place="undefined-in-file">t</a> ->[ 0 ]->{ v }"</span> 354<a class="l" name="349" href="#349">349</a><span class="s"> and k4 = "$<a href="/source/s?defs=u" class="intelliWindow-symbol" data-definition-place="undefined-in-file">u</a> ->{ k }->[ 0 ]"</span> 355<a class="hl" name="350" href="#350">350</a><span class="s"> order by value_date DESC]</span>; 356<a class="l" name="351" href="#351">351</a><b>push</b> @$<a href="/source/s?defs=html" class="intelliWindow-symbol" data-definition-place="undefined-in-file">html</a>, <span class="s">"<TD width=\"20%\">"</span>; 357<a class="l" name="352" href="#352">352</a><b>print</b> <span class="s">"%\abc\n"</span>, <b>%\</b>, <span class="s">"abc\n"</span>; 358<a class="l" name="353" href="#353">353</a><span class="c"># some comment</span> 359<a class="l" name="354" href="#354">354</a><b>push</b> @<a href="/source/s?defs=arr" class="intelliWindow-symbol" data-definition-place="undefined-in-file">arr</a>, <span class="s">"'$<a href="/source/s?defs=key" class="intelliWindow-symbol" data-definition-place="undefined-in-file">key</a>'=>"</span> . <span class="s">'q['</span> . $<a href="/source/s?defs=val" class="intelliWindow-symbol" data-definition-place="undefined-in-file">val</a> . <span class="s">'],'</span>; 360<a class="l" name="355" href="#355">355</a><span class="c">#qq[$var]</span> 361<a class="l" name="356" href="#356">356</a> 362<a class="l" name="357" href="#357">357</a><span class="c"># more HERE-document tests</span> 363<a class="l" name="358" href="#358">358</a><a href="/source/s?defs=myfunc2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">myfunc2</a>(<< "THIS", $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>, <<~'THAT', $<a href="/source/s?defs=var" class="intelliWindow-symbol" data-definition-place="undefined-in-file">var</a>, <<OTHER, <<\ELSE, <<`Z`);<span class="s"></span> 364<a class="l" name="359" href="#359">359</a><span class="s">Here's a $<a href="/source/s?defs=line1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">line1</a></span> 365<a class="hl" name="360" href="#360">360</a><span class="s"></span>THIS<span class="s"></span> 366<a class="l" name="361" href="#361">361</a><span class="s"> Here's a $line2</span> 367<a class="l" name="362" href="#362">362</a><span class="s"></span> THAT<span class="s"></span> 368<a class="l" name="363" href="#363">363</a><span class="s">Here's a $<a href="/source/s?defs=line3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">line3</a></span> 369<a class="l" name="364" href="#364">364</a><span class="s"></span>OTHER<span class="s"></span> 370<a class="l" name="365" href="#365">365</a><span class="s">Here's a $line4</span> 371<a class="l" name="366" href="#366">366</a><span class="s"></span>ELSE<span class="s"></span> 372<a class="l" name="367" href="#367">367</a><span class="s">Here's a $<a href="/source/s?defs=line5" class="intelliWindow-symbol" data-definition-place="undefined-in-file">line5</a></span> 373<a class="l" name="368" href="#368">368</a><span class="s">Here's a \$line6</span> 374<a class="l" name="369" href="#369">369</a><span class="s"></span>Z 375<a class="hl" name="370" href="#370">370</a><span class="s">/\b sentinel \b/</span> && <b>print</b>; <span class="c"># This should heuristically match as m//</span> 376<a class="l" name="371" href="#371">371</a> 377<a class="l" name="372" href="#372">372</a><span class="c"># more quote-like tests</span> 378<a class="l" name="373" href="#373">373</a><b>for</b> <b>my</b> $<a href="/source/s?defs=k" class="intelliWindow-symbol" data-definition-place="undefined-in-file">k</a> (<b>grep</b> <span class="s">/=/</span>, <b>split</b> <span class="s">/;/</span>, $<a href="/source/s?defs=d" class="intelliWindow-symbol" data-definition-place="undefined-in-file">d</a>, -<span class="n">1</span>) { 379<a class="l" name="374" href="#374">374</a> <b>print</b> <span class="s">"1\n"</span>; 380<a class="l" name="375" href="#375">375</a>} 381<a class="l" name="376" href="#376">376</a> 382<a class="l" name="377" href="#377">377</a><span class="c"># more format tests</span> 383<a class="l" name="378" href="#378">378</a>%<a href="/source/s?defs=a" class="intelliWindow-symbol" data-definition-place="undefined-in-file">a</a> = ( 384<a class="l" name="379" href="#379">379</a> <b>format</b> => <span class="s">"%<a href="/source/s?defs=s" class="intelliWindow-symbol" data-definition-place="undefined-in-file">s</a>"</span>); 385<a class="hl" name="380" href="#380">380</a><b> format</b>=<span class="s"></span> 386<a class="l" name="381" href="#381">381</a><span class="s">@<<<<<< @|||||| @>>>>>></span> 387<a class="l" name="382" href="#382">382</a><span class="s">"left", "middle", "right"</span> 388<a class="l" name="383" href="#383">383</a><span class="s">.</span> 389<a class="l" name="384" href="#384">384</a><b>print</b> <span class="s">"1\n"</span>; 390<a class="l" name="385" href="#385">385</a><b>print</b> <span class="s">'<a href="http://example.com">http://example.com</a>'</span>; 391<a class="l" name="386" href="#386">386</a></body> 392</html> 393