Mercurial > mercurial > hgweb_iklist.hg.cgi

comparison prog/08.pl @ 1:13e80a745ef0 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
beta2 release.
author pyon <pyon@macmini>
date Tue, 24 Aug 2021 21:30:47 +0900
parents
children
comparison
equal deleted inserted replaced
0:520044113ef0 1:13e80a745ef0
1 # XOR 17
2
3 #my $pw = 'kaigo862';
4 my $pw = 'kouiki862';
5 for (split //, $pw) {
6 my $o = (ord $_) ^ 17;
7 print chr $o;
8 }
9 print "\n";