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
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
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
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/
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'
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 =
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
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
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
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
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
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
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
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
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
>>>
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
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
17 matches
Mail list logo