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:
SiteGuard Admin Feature ? (1997)
Location of Webcat site in folder hierarchy (1997)
Auto Wrap Text in (2004)
Cart Numbers (1997)
2nd WebCatalog2 Feature Request (1996)
[WriteFile] problems (1997)
[WebDNA] Intranet site request (2010)
Speed questions (1998)
type 2 errors with ssl server (1997)
Protect (1997)
Tags on root directory files? (1998)
Help! WebCat2 bug (1997)
[WebDNA] Search comparisons in 8.6.1 (2019)
WebDNA security (2004)
PIXO Support (1997)
Just Testing (1997)
WCS Newbie question (1997)
Multiple catalog databases and showcart (1997)
Need help with emailer- 2 issues (1997)
RED QUESTION MARK (1999)