Re: csv file question

2008-05-09 Thread perl pra
Hi please check the following script , you need not to handle null because it is in quotes,I have tested the following code it works fine use strict; use warnings; my %has; my $NULL=0; (open my $FH, '<', "mail.csv") or die "$!"; while(<$FH>) { my($one,$two,$three)=split(/\,/,$_); $has{$one

perl-support for vim help needed

2008-05-09 Thread Richard Lee
does anyone use perl-support for vim here? I installed it but having trouble bringing up the menus.. does anyone uses this? and know how to bring up the menu? If the root menu 'Perl' is not visible call it with the item "Load Perl Support" from the standard Tools-menu. <-- where is this sta

Re: Text to hex

2008-05-09 Thread John W. Krahn
Mark Wagner wrote: Given a string of text, how do I convert it to a string of hexadecimal values? For example, given the string "Hello", I want the string "48 65 6C 6C 6F". $ perl -le'my $string = "Hello"; print unpack "H*", $string' 48656c6c6f John -- Perl isn't a toolbox, but a small machi

Text to hex

2008-05-09 Thread Mark Wagner
Given a string of text, how do I convert it to a string of hexadecimal values? For example, given the string "Hello", I want the string "48 65 6C 6C 6F". -- Mark -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: deleting a user name from a file

2008-05-09 Thread Lokeey
On Fri, May 9, 2008 at 12:56 PM, Rob Dixon <[EMAIL PROTECTED]> wrote: > Lokeey wrote: > > > > I'm writing this script to remove users from a file, the sudoers file, to > be > > more specific. > > > > Here is what I have so far, not sure where to go from here. > > > > *#!/usr/bin/perl -w > > There'

Re: comparing kit names

2008-05-09 Thread perl_learner
On May 8, 9:09 am, [EMAIL PROTECTED] (Gunnar Hjalmarsson) wrote: > perl_learner wrote: > > On May 7, 4:55 am, [EMAIL PROTECTED] (Gunnar Hjalmarsson) wrote: > >> perl_learner wrote: > >>> On May 6, 10:08 am, [EMAIL PROTECTED] (Gunnar Hjalmarsson) wrote: > perl_learner wrote: > > my @kits =

RE: dns error or module error?

2008-05-09 Thread John Wilson
Perl 5.8.5 The error isn't coming from a script - it's from the actual install using cpan. Really what I'm doing is installing IO::Socket::SSL. Right into the install, cpan recognizes I don't have Net::SSLeay, so it goes ahead and installs it first, and that's when I get this error, I think duri

Re: dns error or module error?

2008-05-09 Thread Rob Dixon
John Wilson wrote: > > Trying to install Net::SSLeay on Solaris 9 and I get the following > message in the output: > > > Use of uninitialized value in subroutine entry at > /m1/shared/perl/5.8.5-09/lib/5.8.5/sun4-solaris/Socket.pm line 373. > > Bad arg length for Socket::pack_sockaddr_in, leng

Perl MQSeries API newbie help

2008-05-09 Thread Ravi Malghan
Hi: I have very little knowledge about MQ Series. I have built the MQ Client and MQSeries perl API on my server. My MQ admin also has provided me the name of ques, queue manager, MA CHannel, hostname and port. I am trying to build a simple script that will connect to a que and fetch messages. I

dns error or module error?

2008-05-09 Thread John Wilson
Trying to install Net::SSLeay on Solaris 9 and I get the following message in the output: Use of uninitialized value in subroutine entry at /m1/shared/perl/5.8.5-09/lib/5.8.5/sun4-solaris/Socket.pm line 373. Bad arg length for Socket::pack_sockaddr_in, length is 0, should be 4 at /m1/shared/pe

Re: deleting a user name from a file

2008-05-09 Thread Rob Dixon
Lokeey wrote: > > Rob thanks for your input. Yes the * is a typo or pasted somehow. Rushed > and wasn't paying attention, and worked on it some more after I sent > that out and thought about how the ARGV and my other syntax, it didn't > make sense to me. But I saw your comment just now and had alr

Re: deleting a user name from a file

2008-05-09 Thread Rob Dixon
Lokeey wrote: > > I'm writing this script to remove users from a file, the sudoers file, to be > more specific. > > Here is what I have so far, not sure where to go from here. > > *#!/usr/bin/perl -w There's a star before your #! Is it a typing mistake? Also, use strict; or there is little

script for an mbox

2008-05-09 Thread Tony Heal
I need to remove all messages older than X from a gigabyte size mbox. Anyone got a script for this? Tony Heal Pace Systems Group, Inc. 800-624-5999 x9317

deleting a user name from a file

2008-05-09 Thread Lokeey
I'm writing this script to remove users from a file, the sudoers file, to be more specific. Here is what I have so far, not sure where to go from here. *#!/usr/bin/perl -w # this script removes a user from sudoers file my $sites = $ARGV[0]; my $user = $ARGV[1]; for my $site ($#ARGV[1]){ open

Re: Text formatting issues

2008-05-09 Thread Rob Dixon
hotkitty wrote: > On May 7, 8:40 am, [EMAIL PROTECTED] (Rob Dixon) wrote: >> hotkitty wrote: >>> First and foremost thanks for all the help I've received on this >>> board, especially Gunnar who keeps this place running! >>> I've come a long way in my code and am trying to format some text and >>>

Re: Text formatting issues

2008-05-09 Thread hotkitty
On May 7, 8:40 am, [EMAIL PROTECTED] (Rob Dixon) wrote: > hotkitty wrote: > > First and foremost thanks for all the help I've received on this > > board, especially Gunnar who keeps this place running! > > > I've come a long way in my code and am trying to format some text and > > then put it into

Documentation problem

2008-05-09 Thread 亂世貓熊
Hi all, I have some problem on writing remarks on module. use SomeMod ; # exported "BuildFather" $x = BuildFather ( %argv ) ; $x_child = $x -> GiveSomething ( %argv ) ; $x_grandson = $x_child -> DoSomthingElse ( %argv ) ; print $x_child -> {Value}{Provided}{by}{Grandson} So, which is a c