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:
[WebDNA] WebDNA Start-up Error (2012)
Runtime version ... (2003)
Explorer 3.0 (1997)
problem using ErrorMessages.db to redirect requests (2004)
PIXO (1997)
Searchable list archive (1997)
protect tag not working (1998)
SKU Question (1999)
Error 551 (2000)
Cookies and the EU (John, don't read this) (2001)
Database Updates (1997)
SiteGaurd file Cache vs webcatalog cache (1997)
webcat- multiple selection in input field (1997)
WebCatalog can't find database (1997)
Erotic Sites (1997)
Single Link browsing (1997)
Web Catalog vs. ICAT (1997)
simple answer? [hideif] (1997)
Don'y know if this is a sily question... (2003)
serial number (1998)