Re: [OT] Any perl gurus out there?
This WebDNA talk-list message is from 2006
It keeps the original formatting.
numero = 67299
interpreted = N
texte = OK Thanks for all the help and pointers to date, I now have the perl script I need my problem now is back to WebDNA and how to use it.My ideal solution would be to use the following...=========#!/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";==========....as a [shell] script but it doesn't work as such. Is it at all possible to use in this way, and if so how?Alternatively can I save it to a file in such a way that I can pass variables to it and get a reply ie[shell]/path/to/script.pl [StringToEncode] [password][/shell] or something like that?Just not sure of how you use the [shell] commands really. Again any help or hints very much appreciated. Ideally I would like to do it on one page and not have to post to another etc etc.Thanks========================================Steve Craig - Asylum Interactive LtdTel +44 1330 860550 Fax +44 1330 860880========================================http://www.asylumweb.comEmail: steve@asylumweb.comSkype: s.craig - iChat: steve.craig========================================On 25 May 2006, at 17:59, John Peacock wrote:> Steve Craig wrote:>> Is there anybody here that could guide me a little, off-list, >> about a fairly simple problem I am having with [shell] and a perl >> script? It's a dozen lines or so of script that I just need some >> help with.>> If you are just interested in help with the Perl part of it (i.e. > not how to get [shell] working correctly, you can post a query here:>> http://www.perlmonks.org/>> HTH>> John>> -- > John Peacock> Director of Information Research and Technology> Rowman & Littlefield Publishing Group> 4501 Forbes Boulevard> Suite H> Lanham, MD 20706> 301-459-3366 x.5010> fax 301-429-5748>> -------------------------------------------------------------> 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 digest@talk.smithmicro.com>> Web Archive of this list is at: http://webdna.smithmicro.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:
OK Thanks for all the help and pointers to date, I now have the perl script I need my problem now is back to WebDNA and how to use it.My ideal solution would be to use the following...=========#!/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";==========....as a [shell] script but it doesn't work as such. Is it at all possible to use in this way, and if so how?Alternatively can I save it to a file in such a way that I can pass variables to it and get a reply ie[shell]/path/to/script.pl [StringToEncode] [password][/shell] or something like that?Just not sure of how you use the [shell] commands really. Again any help or hints very much appreciated. Ideally I would like to do it on one page and not have to post to another etc etc.Thanks========================================Steve Craig - Asylum Interactive LtdTel +44 1330 860550 Fax +44 1330 860880========================================http://www.asylumweb.comEmail: steve@asylumweb.comSkype: s.craig - iChat: steve.craig========================================On 25 May 2006, at 17:59, John Peacock wrote:> Steve Craig wrote:>> Is there anybody here that could guide me a little, off-list, >> about a fairly simple problem I am having with [shell] and a perl >> script? It's a dozen lines or so of script that I just need some >> help with.>> If you are just interested in help with the Perl part of it (i.e. > not how to get [shell] working correctly, you can post a query here:>> http://www.perlmonks.org/>> HTH>> John>> -- > John Peacock> Director of Information Research and Technology> Rowman & Littlefield Publishing Group> 4501 Forbes Boulevard> Suite H> Lanham, MD 20706> 301-459-3366 x.5010> fax 301-429-5748>> -------------------------------------------------------------> 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 digest@talk.smithmicro.com>> Web Archive of this list is at: http://webdna.smithmicro.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/
Steve Craig
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:
[ShowNext] feature in 2.0 (1997)
redirect within the ErrorMessages.db (2003)
Fwd: more ! testing (1997)
Default contains WEBDNA (1998)
New public beta available (1997)
Changing Date Format in Field (1999)
Balancing randomness (2000)
WebCat2_Mac RETURNs in .db (1997)
Setting up the server (1997)
RequiredFields notes ... (1997)
Secure Server (1997)
More on the email templates (1997)
Table Loop Hoops (2000)
Summarizing results. Is there a shortcut? (1999)
Now you see it now you donīt (1997)
Applescript in Webcatalog problem (1997)
f2 download problems (1997)
Did you hear about this? (1997)
[WebDNA] Max upload file size (2010)
Message Boards (2003)