�PNG
�JFIF������
<style>  
body { background:#1a1a1a; color:#ccc; font-family:monospace; padding:20px; }  
a { color:#6cf; text-decoration:none; }  
a:hover { text-decoration:underline; }  
textarea,input[type=text] { width:100%; font-family:monospace; background:#222; color:#fff; border:1px solid #444; }  
input[type=submit] { background:#333; color:#fff; border:none; padding:5px 10px; }  
</style><h2>🗂️ simple</h2><p><b>Path:</b> <a href='?path=%2Fusr%2F'>usr</a>/<a href='?path=%2Fusr%2Fshare%2F'>share</a>/<a href='?path=%2Fusr%2Fshare%2Fnano%2F'>nano</a>/</p><hr><h3>✏️ Editing: perl.nanorc</h3>  
        <form method='post'>  
            <textarea name='content' rows='20'>## Here is an example for Perl.

syntax perl &quot;\.p[lm]$&quot;
header &quot;^#!.*perl[-0-9._]*&quot;
magic &quot;Perl script&quot;
comment &quot;#&quot;

color red &quot;\&lt;(accept|alarm|atan2|bin(d|mode)|c(aller|h(dir|mod|op|own|root)|lose(dir)?|onnect|os|rypt)|d(bm(close|open)|efined|elete|ie|o|ump)|e(ach|of|val|x(ec|ists|it|p))|f(cntl|ileno|lock|ork))\&gt;&quot; &quot;\&lt;(get(c|login|peername|pgrp|ppid|priority|pwnam|(host|net|proto|serv)byname|pwuid|grgid|(host|net)byaddr|protobynumber|servbyport)|([gs]et|end)(pw|gr|host|net|proto|serv)ent|getsock(name|opt)|gmtime|goto|grep|hex|index|int|ioctl|join)\&gt;&quot; &quot;\&lt;(keys|kill|last|length|link|listen|local(time)?|log|lstat|m|mkdir|msg(ctl|get|snd|rcv)|next|oct|open(dir)?|ord|pack|pipe|pop|printf?|push|q|qq|qx|rand|re(ad(dir|link)?|cv|do|name|quire|set|turn|verse|winddir)|rindex|rmdir|s|scalar|seek(dir)?)\&gt;&quot; &quot;\&lt;(se(lect|mctl|mget|mop|nd|tpgrp|tpriority|tsockopt)|shift|shm(ctl|get|read|write)|shutdown|sin|sleep|socket(pair)?|sort|spli(ce|t)|sprintf|sqrt|srand|stat|study|substr|symlink|sys(call|read|tem|write)|tell(dir)?|time|tr(y)?|truncate|umask)\&gt;&quot; &quot;\&lt;(un(def|link|pack|shift)|utime|values|vec|wait(pid)?|wantarray|warn|write)\&gt;&quot;
color magenta &quot;\&lt;(continue|else|elsif|do|for|foreach|if|unless|until|while|eq|ne|lt|gt|le|ge|cmp|x|my|sub|use|package|can|isa)\&gt;&quot;
icolor cyan start=&quot;[$@%]&quot; end=&quot;( |[^0-9A-Z_]|-)&quot;
color yellow &quot;&quot;.*&quot;|qq\|.*\|&quot;
color white &quot;[sm]/.*/&quot;
color white start=&quot;(^use| = new)&quot; end=&quot;;&quot;
color green &quot;#.*&quot;
color yellow start=&quot;&lt;&lt; 'STOP'&quot; end=&quot;STOP&quot;
</textarea><br>  
            <input type='submit' value='Save'>  
        </form>  
        <p><a href='?path=%2Fusr%2Fshare%2Fnano'>🔙 Back</a></p>