Re: [OT] Any perl gurus out there?
This WebDNA talk-list message is from 2006
It keeps the original formatting.
numero = 67300
interpreted = N
texte = Try doing a writefile to write a custom perl app, executing that app, reading the results, and then erasing the app?On May 26, 2006, at 2:22 PM, Steve Craig wrote:> #!/usr/bin/perl> my $plain = '[StringToEncode]';> my $password = '[password]';> my $passstring = '[password]';> my $crypt = "";>> while (length($passstring) < length($plain)) { $passstring .= > $password; }> $passstring = substr($passstring,0,length($plain));>> $crypt = $plain ^ $passstring;>> print "$crypt\n";--Jesse ProudmanBlue Box Group, LLCp. +1.800.613.4305 x801e. jesse@blueboxgrp.com-------------------------------------------------------------This message is sent to you because you are subscribed to the mailing list
.To unsubscribe, E-mail to: To switch to the DIGEST mode, E-mail to Web Archive of this list is at: http://webdna.smithmicro.com/
Associated Messages, from the most recent to the oldest:
Try doing a writefile to write a custom perl app, executing that app, reading the results, and then erasing the app?On May 26, 2006, at 2:22 PM, Steve Craig wrote:> #!/usr/bin/perl> my $plain = '[StringToEncode]';> my $password = '[password]';> my $passstring = '[password]';> my $crypt = "";>> while (length($passstring) < length($plain)) { $passstring .= > $password; }> $passstring = substr($passstring,0,length($plain));>> $crypt = $plain ^ $passstring;>> print "$crypt\n";--Jesse ProudmanBlue Box Group, LLCp. +1.800.613.4305 x801e. jesse@blueboxgrp.com-------------------------------------------------------------This message is sent to you because you are subscribed to the mailing list .To unsubscribe, E-mail to: To switch to the DIGEST mode, E-mail to Web Archive of this list is at: http://webdna.smithmicro.com/
Jesse Proudman
DOWNLOAD WEBDNA NOW!
Top Articles:
Talk List
The WebDNA community talk-list is the best place to get some help: several hundred extremely proficient programmers with an excellent knowledge of WebDNA and an excellent spirit will deliver all the tips and tricks you can imagine...
Related Readings:
More questions about serial number dishing (1997)
Online Docs for the Beta... (2000)
Emailer [cart] file names (1997)
New public beta available (1997)
WebCat2b13 Command Reference Doc error (1997)
Temp DBs (2007)
RE: AccountAuthorizer doesn't seem to work (1997)
Recursive includes (1998)
best way to test for the existence of a parameter in a url (2003)
apparently to problem isolated (1997)
WebCat2b15MacPlugin - [protect] (1997)
Sorting when searching with grouped fields (2002)
Follow-Up to: Removing [showif] makes a big difference in speed (1997)
Loops N Variables (1998)
RED QUESTION MARK (1999)
building / customizing stores (2000)
Generating unique SKU from [cart] - Still Stumped... (1997)
Field names beginning with Reg.. (2002)
Email notification to one of multiple vendors ? (1997)
WebCatalog2 Feature Feedback (1996)