File indexing completed on 2024-05-12 04:02:07
0001 <!DOCTYPE html> 0002 <html><head> 0003 <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/> 0004 <title>highlight.pl</title> 0005 <meta name="generator" content="KF5::SyntaxHighlighting - Definition (Perl) - Theme (Breeze Dark)"/> 0006 </head><body style="background-color:#232629;color:#cfcfc2"><pre> 0007 <span style="font-weight:bold">#!/usr/bin/perl -w</span> 0008 <span style="color:#7a7c7d"># This is a pseudo Perl file to test Kate's Perl syntax highlighting.</span> 0009 <span style="color:#7a7c7d"># </span><span style="color:#ca9219;background-color:#451e1a;font-weight:bold">TODO</span><span style="color:#7a7c7d">: this is incomplete, add more syntax examples!</span> 0010 0011 <span style="font-weight:bold">sub </span><span style="color:#8e44ad">prg</span>(<span style="color:#2980b9">$</span>) 0012 { 0013 <span style="font-weight:bold">my</span> <span style="color:#2980b9">$var</span> = <span style="color:#8e44ad">shift</span>; 0014 0015 <span style="color:#2980b9">$var</span> =~ <span style="color:#27ae60;font-weight:bold">s/</span><span style="color:#27ae60">bla</span><span style="color:#27ae60;font-weight:bold">/</span><span style="color:#f44f4f">foo</span><span style="color:#27ae60;font-weight:bold">/igs</span>; 0016 <span style="color:#2980b9">$var</span> =~ <span style="color:#27ae60;font-weight:bold">s!</span><span style="color:#27ae60">bla</span><span style="color:#27ae60;font-weight:bold">!</span><span style="color:#f44f4f">foo</span><span style="color:#27ae60;font-weight:bold">!igs</span>; 0017 <span style="color:#2980b9">$var</span> =~ <span style="color:#27ae60;font-weight:bold">s#</span><span style="color:#27ae60">bla</span><span style="color:#27ae60;font-weight:bold">#</span><span style="color:#f44f4f">foo</span><span style="color:#27ae60;font-weight:bold">#igs</span>; 0018 <span style="color:#2980b9">$var</span> =~ <span style="color:#27ae60;font-weight:bold">tr</span><span style="color:#27ae60">/a-z/A-Z/</span>; 0019 (<span style="color:#2980b9">$match</span>) = (<span style="color:#2980b9">$var</span> =~ <span style="color:#27ae60;font-weight:bold">m/</span><span style="color:#3daee9">(</span><span style="color:#27ae60">.</span><span style="color:#3daee9">*?)</span><span style="color:#27ae60;font-weight:bold">/igs</span>); 0020 0021 <span style="color:#2980b9">$test</span> = <span style="color:#f67400">2</span>/<span style="color:#f67400">453453.21</span>; 0022 <span style="color:#2980b9">$test</span> /= <span style="color:#f67400">2</span>; 0023 0024 <span style="color:#8e44ad">print</span> <span style="color:#27ae60;font-weight:bold">qq~</span><span style="color:#f44f4f">d fsd fsdf sdfl sd</span><span style="color:#27ae60;font-weight:bold">~</span> 0025 0026 <span style="color:#da4453">$"</span> = <span style="color:#27ae60;font-weight:bold">'</span><span style="color:#da4453">/</span><span style="color:#27ae60;font-weight:bold">'</span>; 0027 0028 <span style="color:#2980b9">$foo</span> = <span style="color:#27ae60;font-weight:bold"><<</span><span style="font-weight:bold">__EOF;</span> 0029 <span style="color:#f44f4f">d ahfdklf klsdfl sdf sd</span> 0030 <span style="color:#f44f4f">fsd sdf sdfsdlkf sd</span> 0031 <span style="font-weight:bold">__EOF</span> 0032 0033 <span style="color:#2980b9">$x</span> = <span style="color:#27ae60;font-weight:bold">"</span><span style="color:#f44f4f">dasds</span><span style="color:#27ae60;font-weight:bold">"</span>; 0034 0035 <span style="font-weight:bold">next</span> <span style="font-weight:bold">if</span>( <span style="color:#2980b9">$match</span> <span style="color:#27ae60;font-weight:bold">eq</span> <span style="color:#27ae60;font-weight:bold">"</span><span style="color:#f44f4f">two</span><span style="color:#27ae60;font-weight:bold">"</span> ); 0036 <span style="font-weight:bold">next</span> <span style="font-weight:bold">if</span>( <span style="color:#2980b9">$match</span> =~ <span style="color:#27ae60;font-weight:bold">/</span><span style="color:#27ae60">go</span><span style="color:#27ae60;font-weight:bold">/i</span> ); 0037 0038 <span style="color:#2980b9">@array</span> = (<span style="color:#f67400">1</span>,<span style="color:#f67400">2</span>,<span style="color:#f67400">3</span>); <span style="color:#7a7c7d"># a comment</span> 0039 <span style="color:#7a7c7d"># Test qw versions with special ending characters</span> 0040 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw(</span>apple foo bar<span style="color:#27ae60;font-weight:bold">)</span>; 0041 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw[</span>apple foo bar<span style="color:#27ae60;font-weight:bold">]</span>; 0042 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw{</span>apple foo bar<span style="color:#27ae60;font-weight:bold">}</span>; 0043 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw<</span>apple foo bar<span style="color:#27ae60;font-weight:bold">></span>; 0044 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw(</span> 0045 multi 0046 line 0047 test 0048 <span style="color:#27ae60;font-weight:bold">)</span>; 0049 <span style="color:#7a7c7d"># Test qw with non special ending characters;</span> 0050 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw/</span>apple foo bar<span style="color:#27ae60;font-weight:bold">/</span>; 0051 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw|</span>apple foo bar<span style="color:#27ae60;font-weight:bold">|</span>; 0052 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw@</span>apple foo bar<span style="color:#27ae60;font-weight:bold">@</span>; 0053 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw!</span>apple foo bar<span style="color:#27ae60;font-weight:bold">!</span>; 0054 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw"</span>apple foo bar<span style="color:#27ae60;font-weight:bold">"</span>; 0055 <span style="color:#2980b9">@array</span> = <span style="color:#27ae60;font-weight:bold">qw'</span>apple foo bar<span style="color:#27ae60;font-weight:bold">'</span>; 0056 <span style="color:#8e44ad">push</span>(<span style="color:#2980b9">@array</span>, <span style="color:#f67400">4</span>); 0057 <span style="color:#2980b9">%hash</span> = (red => <span style="color:#27ae60;font-weight:bold">'</span><span style="color:#da4453">rot</span><span style="color:#27ae60;font-weight:bold">'</span>, 0058 blue => <span style="color:#27ae60;font-weight:bold">'</span><span style="color:#da4453">blau</span><span style="color:#27ae60;font-weight:bold">'</span>); 0059 <span style="color:#8e44ad">print</span> <span style="color:#8e44ad">keys</span>(<span style="color:#2980b9">%hash</span>); 0060 } 0061 0062 <span style="font-weight:bold">sub </span><span style="color:#8e44ad">blah</span> { 0063 <span style="font-weight:bold">my</span> <span style="color:#2980b9">$str</span> = <span style="color:#27ae60;font-weight:bold"><<</span><span style="font-weight:bold"> ' EOS';</span> 0064 this is my string 0065 and it's continuation 0066 <span style="font-weight:bold"> EOS</span> 0067 0068 <span style="color:#2980b9">$str</span> = <span style="color:#27ae60;font-weight:bold">"</span><span style="color:#f44f4f">hello world</span><span style="color:#27ae60;font-weight:bold">"</span>; 0069 0070 <span style="color:#2980b9">$str</span> = <span style="color:#27ae60;font-weight:bold"><<</span><span style="font-weight:bold"> " EOS";</span> 0071 <span style="color:#f44f4f"> this is my string</span> 0072 <span style="color:#f44f4f"> and it's continuation</span> 0073 <span style="font-weight:bold"> EOS</span> 0074 } 0075 0076 &blah; 0077 prg(<span style="color:#27ae60;font-weight:bold">"</span><span style="color:#f44f4f">test</span><span style="color:#27ae60;font-weight:bold">"</span>); 0078 0079 <span style="color:#7a7c7d"># Bracket closures in RegExp patterns (bug #364866)</span> 0080 <span style="color:#27ae60;font-weight:bold">qr{</span><span style="color:#27ae60"> </span><span style="color:#3daee9">$</span><span style="color:#27ae60">{var} aa{aa{a}a} aa</span><span style="color:#3daee9">*</span><span style="color:#27ae60">b</span><span style="color:#3daee9">?</span><span style="color:#27ae60;font-weight:bold">}</span>; 0081 <span style="color:#27ae60;font-weight:bold">qr(</span><span style="color:#27ae60">aa</span><span style="color:#3daee9">(</span><span style="color:#27ae60">a</span><span style="color:#3daee9">(</span><span style="color:#27ae60">a</span><span style="color:#3daee9">(</span><span style="color:#27ae60">a</span><span style="color:#3daee9">(</span><span style="color:#27ae60">b</span><span style="color:#3daee9">|</span><span style="color:#27ae60">c</span><span style="color:#3daee9">)</span><span style="color:#27ae60">a</span><span style="color:#3daee9">)</span><span style="color:#27ae60">a</span><span style="color:#3daee9">)</span><span style="color:#27ae60">a</span><span style="color:#3daee9">)</span><span style="color:#27ae60">aa</span><span style="color:#3daee9">*</span><span style="color:#27ae60">b</span><span style="color:#3daee9">?</span><span style="color:#27ae60;font-weight:bold">)</span>; 0082 <span style="color:#27ae60;font-weight:bold">s{</span><span style="color:#27ae60">aaa {aaa} a </span><span style="color:#da4453">\x{A2}</span><span style="color:#27ae60"> </span><span style="color:#3daee9">*</span><span style="color:#27ae60">b</span><span style="color:#3daee9">?</span><span style="color:#27ae60;font-weight:bold">}{</span><span style="color:#f44f4f">aa</span><span style="color:#27ae60;font-weight:bold">}</span>; 0083 <span style="color:#27ae60;font-weight:bold">s(</span><span style="color:#27ae60">aa</span><span style="color:#3daee9">(</span><span style="color:#27ae60">a</span><span style="color:#3daee9">(</span><span style="color:#27ae60">a</span><span style="color:#3daee9">(</span><span style="color:#27ae60">a</span><span style="color:#3daee9">(</span><span style="color:#27ae60">b</span><span style="color:#3daee9">|</span><span style="color:#27ae60">c</span><span style="color:#3daee9">)</span><span style="color:#27ae60">a</span><span style="color:#3daee9">)</span><span style="color:#27ae60">a</span><span style="color:#3daee9">)</span><span style="color:#27ae60">a</span><span style="color:#3daee9">)</span><span style="color:#27ae60">aa</span><span style="color:#27ae60;font-weight:bold">)(</span><span style="color:#f44f4f">aa</span><span style="color:#27ae60;font-weight:bold">)</span>; 0084 0085 <span style="color:#7a7c7d"># Strings as scalar references (bug #348765)</span> 0086 <span style="color:#2980b9">$x</span> = \<span style="color:#27ae60;font-weight:bold">'</span><span style="color:#da4453">Reference of a String</span><span style="color:#27ae60;font-weight:bold">'</span>; 0087 <span style="color:#2980b9">$y</span> = \<span style="color:#27ae60;font-weight:bold">"</span><span style="color:#f44f4f">Reference of a String</span><span style="color:#27ae60;font-weight:bold">"</span>; 0088 0089 <span style="color:#7a7c7d"># Variables that start with underscore (bug #355300)</span> 0090 <span style="color:#2980b9">$_variable</span> 0091 <span style="color:#da4453">$_</span> <span style="color:#7a7c7d"># Reserved var.</span> 0092 0093 <span style="font-weight:bold">for</span> <span style="font-weight:bold">my</span> <span style="color:#2980b9">$x</span> (<span style="color:#2980b9">$hash</span>->{arr}-><span style="color:#2980b9">@</span><span style="color:#27ae60;font-weight:bold">*</span>) { 0094 <span style="font-weight:bold">for</span> <span style="font-weight:bold">my</span> <span style="color:#2980b9">$k</span> (<span style="color:#8e44ad">keys</span> <span style="color:#2980b9">$k</span>->%<span style="color:#27ae60;font-weight:bold">*</span>) { 0095 ... 0096 } 0097 } 0098 0099 <span style="color:#7a7c7d"># Highlight correctly operator // (bug #407327)</span> 0100 <span style="color:#2980b9">$x</span> = ns // <span style="color:#27ae60;font-weight:bold">""</span>; 0101 <span style="color:#8e44ad">print</span> <span style="color:#2980b9">$x</span>; 0102 </pre></body></html>