On 4/2/07, Nigel Peck <[EMAIL PROTECTED]> wrote:
My question is, is this the best way to go about having modules in
development?
Yes and no.
Read more about this at:
http://www.perlmonks.org/index.pl?node_id=238691
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org
oad
them.
I would suggest you look toward WWW::Mechanize
http://search.cpan.org/search?query=WWW::Mechanize&mode=all
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
http://pgp.mit.edu:11371/pks/lookup?op=vindex&search=0x2A46CF06&fingerprint=on
--
To unsubscri
On 3/13/07, Bill Jones <[EMAIL PROTECTED]> wrote:
000005000
002
000 \0 \n
002
Erm, make that:
od -b xxx is -
000 000 012
002
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
http://pgp.mit.edu:11371/pks/lookup?op=vindex&
sing od -c I see two bytes for the Control-J: \0 and \n
000005000
002
000 \0 \n
002
In answer to your question, for example under VIM, the ^@ the other
poster is seeing is actually \n (which is what the OP wants) -- but I
am in my own Universe =)
So, when I hit ^V^J V
Gr check syntax check syntax ; lol ...
On 3/1/07, Bill Jones <[EMAIL PROTECTED]> wrote:
# A long winded approach might use
# (modified from FAQ 8) -
use IPC::Open3;
$_ = "I am the Alpha and the Omega (UT99 Player Xan)\n";
open(o, "cat $_");
print;
pri
om-line? Be careful of your I/O -- things that seem to make
program (logical) order sense may not produce expected results...
One possible answer to your question -
# A long winded approach might use
# (modified from FAQ 8) -
use IPC::Open3;
$_ = "I am the Alpha and the Omega
erl hacker ...I think I am 1st?
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
http://pgp.mit.edu:11371/pks/lookup?op=vindex&search=0x2A46CF06&fingerprint=on
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
On 2/14/07, Rob Coops <[EMAIL PROTECTED]> wrote:
It might be a little slow as the few people that use perl seem to be able to
need a lot of help on how t use it causing a huge load on the servers :-)
Ouch! lol, I haven't been on there in months =)
--
WC (Bill) Jones -- h
work -- I am using CygWin.
Any ideas would be welcome :-)
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
http://pgp.mit.edu:11371/pks/lookup?op=vindex&search=0x2A46CF06&fingerprint=on
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EM
ion on the web to do this.
http://www-128.ibm.com/developerworks/webservices/library/ws-soapmap1/
???
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
http://pgp.mit.edu:11371/pks/lookup?op=vindex&search=0x2A46CF06&fingerprint=on
--
To unsubscribe, e-mail: [EMAIL
give a LOT of output?
perl -V
???
So, still, when you speak of Perl Core you are still talking about
many needed modules. Additionally, when you speak of CGI.pm there are
still other modules which make sense.
What are you trying to accomplish?
--
WC (Bill) Jones -- http://youve-reached-th
an someone point me to a different mailer that does have this capability?
Maybe you can integrate this:
http://search.cpan.org/src/GMPASSOS/Mail-SendEasy-1.2/lib/Mail/SendEasy/SMTP.pm
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
http://pgp.mit.edu:11371/pks/lookup?
On 1/24/07, Dukelow, Don <[EMAIL PROTECTED]> wrote:
by "ssh". Can someone regimen a Perl "ssh" module that works with
Net::Telnet? I see there are several out there.
I am partial to this one:
http://search.cpan.org/~dbrobins/Net-SSH-Perl-1.30/
--
WC (Bill) Jon
On 1/20/07, Michael Alipio <[EMAIL PROTECTED]> wrote:
my $string = 'vd=root,status=';
'vd=root;status='
$string =~ s[\,][\;]g;
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
http://pgp.mit.edu:11371/pks/lookup?op=vindex&search=0x2A46CF06&
$found{$line} = ["1",$match];
}
}
@modules = sort count keys(%found);
print <perl modules
HTML
$count=0;
foreach $mod(@modules){
chomp $mod;
$count++;
if ($count == 1){
print "$mod\n";
}
if ($count == 2){
print "$mod
uot;;
$val =~ s/%([0-9a-f][0-9a-f])/chr(hex($1))/ieg;
print "... Should be $val \n";
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
http://pgp.mit.edu:11371/pks/lookup?op=vindex&search=0x2A46CF06&fingerprint=on
--
To unsubscribe, e-mail: [EMAIL PR
On 1/13/07, xavier mas <[EMAIL PROTECTED]> wrote:
Yes, this is the code I use, but still doesn't work to me and I can't find the
cause.
Have you looked the results using Data::Dumper? Maybe the results
aren't as expected?
--
WC (Bill) Jones -- http://youve-reached-the
Delete the CygWin Folder ... geez.
PS - This is OT and definitely falls under the category of learn to
use your chosen platform. (God knows I myself have been told that
many times and I do not post this advice lightly. Learn to use the
operating environment you picked.)
--
WC (Bill) Jones
On 12/7/06, Beginner <[EMAIL PROTECTED]> wrote:
my $xml = eval {XMLin($fh, SuppressEmpty => 1, ForceArray =>
qr/item/) };
CGI::Lite and then use $cgi->parse_new_form_data; to get the XML into
your $xml hash.
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinter
jects.
You still need to make sure the proper functions/sub-routines are
"exported" so that your code is called in preference over the Perl
code.
However, if you wish to control what is "required" -- say branch
logic, you will need to stick with te 'require' direc
ou can place the "special" packages in their own directory and point to it:
BEGIN {
unshift (@INC, "/special");
unshift (@INC, "/special/packages");
}
use strict;
use InitGlobal;
HTH/-Sx-
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org
imply installs a kernel-level process to
"interrupt" the target thread/process when a previously determined
"event" occurs.
HTH/-Sx-
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional comma
return back to where it was called from but
actually continue at the point AFTER the previous routine -- a little
confusing to us beginners.
HTH! =)
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mai
On 12/3/06, kyle cronan <[EMAIL PROTECTED]> wrote:
(1<<$ARGV[0])
Just a thought -
The argument you are passing is really the two's complement; so you
are really passing 256M (not 28) to the vec statement.
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
($b->{ahash} eq 'x')) if $sorted == 0;
$sorted = (lc($a->{string}) cmp lc($b->{string})) if $sort == 0;
$sorted;
}
foreach $row (sort sortrows @$rows) {
... blah blah ...
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
--
To unsubscribe, e-mail: [EMAI
acking around with the fish protocol:
http://linuxmafia.com/faq/Security/fish-protocol.html
Maybe make it work even if ssh doesn't ...
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAI
On 10/5/01 12:50 PM, "Michael Fowler" <[EMAIL PROTECTED]> wrote:
>> Also, you're not allowed to set it to 100 outside of the anonymous sub
>> either.
>
> Sure you are, you just have to declare the variable outside of the anonymous
> sub.
>
Not in this *example test* world I created for studen
Another Stew-pid question :]
Given -
{
my $var = 100;
print "\$var is $var\n";
}
print "But here \$var is $var\n";
How can I or is there a way to get outer $var to be equal to 100 without
making $var global? Also, you're not allowed to set it to 100 outside of
the anonymous sub
On 10/4/01 10:55 AM, "Tom Burkhardt" <[EMAIL PROTECTED]> wrote:
... A bunch of HTML deleted...
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
my $imMe = '-Sx-';
print <<_HEREDOCS;
Has this list discussed HERE DOCS ?
If not recently,
On 10/4/01 2:54 AM, "Rahul Garg" <[EMAIL PROTECTED]> wrote:
> what i want is :
>
> $s_month can be 1 to 12
> if($s_month == 1){$s_month = 'JAN'};and so on
> how can i do it.
?
http://www.cpan.org/authors/id/S/SN/SNEEX/cal.perl_v2A
HTH/-Sx- :]
--
To unsubscribe, e-mail: [EMAIL PROTECT
On 10/3/01 11:49 AM, "Pedro A Reche Gallardo"
<[EMAIL PROTECTED]> wrote:
> By a blank line I mean any line containing only white spaces,
> return, tab characters etc.
chomp;
s/\w//g;
print "Non-white space still in there\n" unless length;
???
-Sx-
--
To unsubscribe, e-mail: [EMAIL
On 10/2/01 9:05 PM, "Brett W. McCoy" <[EMAIL PROTECTED]> wrote:
> All things are possible with Perl.
>
Well, caveats apply.
-Sx- :]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
>> Hi,
>>
>> Recently I've received a task to write a script (CGI) to allow changing
>> of user password on a web page. Basically I'm very new to CGIs and is
>> facing a tremendous problem starting this task.
>>
>> Basically, the script is supposed to run on Apache (ran as "nobody") and
>> allow
On 9/26/01 4:02 PM, "Gibbs Tanton - tgibbs" <[EMAIL PROTECTED]> wrote:
> rid of the hard return (^M)
Of course, the easiest NON-Perl way, would be to use VI or PICO to just save
your current ^M char in a file for safe keeping - like when you need it
again.
It's what I do; But some say I'm cra
On 9/25/01 10:26 AM, "Bill Jones" <[EMAIL PROTECTED]> wrote:
> That is a big can of worms...
>
> There are various ways to get what you want - some better and more secure
> than others; but not having root access is not a big deal...
>
> Something that may he
On 9/25/01 11:10 AM, "David Simcik" <[EMAIL PROTECTED]> wrote:
> Hey folks,
> I'm trying to cobble together some form of authentication mechanism on a
> website I am building for a friend. His ISP uses Perl & Apache (it's on a
> linux box). I (obviously) don't have root priviledges and have limit
On 9/24/01 10:53 AM, "COLLINEAU Franck FTRD/DMI/TAM"
<[EMAIL PROTECTED]> wrote:
> How can i repair (with a regular expression) a line with nothing inside ?
s//what/;
???
-Sx-
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
; # These two are not used...
$quota = '';
$passwd = '';
$shell = '';
... Do stuff ...
}
The things you should become familiar with -
perldoc -f getpwent
perldoc -f setpwent
HTH;
-Sx-
William C (Bill) Jones
Lead
the job I have now :)
Best;
-Sx-
William C (Bill) Jones
Lead, Courseware Support Analyst
(Lead e-Systems Developer)
Florida Community College at Jacksonville
501 West State Street, Rm 229
Jacksonville, Florida 32202-4030
[EMAIL PROTECTED]
PHONE (904
39 matches
Mail list logo
