I have written a Perl script which I have used for years to decrypt at the
field level in a file. Occasionally I get a problem file.
It throws out this message like this and stops -
"panic: sv_setpvn called with negative strlen at
encrypt_ssn_2_live_STDIN_or_INFILE.pl line 108, line 1249.
2009 11:22 AM
To: Perl Beginners
Subject: Re: working with CPAN
Fisher, John wrote:
> I have luck sometimes with CPAN and sometimes I don't. It like spinning a
> wheel. I am trying to bring down a module that will read EBCDIC files and
> convert them to ASCII. I need one that will hand
I have luck sometimes with CPAN and sometimes I don't. It like spinning a
wheel. I am trying to bring down a module that will read EBCDIC files and
convert them to ASCII. I need one that will handle packed fields as well. Not
sure this one is it.
Anyway if you have help on that please let me kno
Well, it is coming from an Windows environment but I am doing my work on a
Linux box. I see 7z has a Linux port, so will try that. Thanks for all your
help.
John
snip
>From: Chas. Owens [mailto:chas.ow...@gmail.com]
>It sounds like you are on a Win32 machine. If so, download 7->zip* and
>insta
should test the zipped file and if it requires a password spawn off a process
to do some winzip command line process? "Puppet String"?
Thanks,
John
-Original Message-
From: Chas. Owens [mailto:chas.ow...@gmail.com]
Sent: Wednesday, December 17, 2008 12:18 PM
To: Fishe
That is exactly it. So you are saying that I cannot use this module because it
doesn't take in a password. Is there a module that I could use instead?
Thanks!
-Original Message-
From: Chas. Owens [mailto:chas.ow...@gmail.com]
Sent: Tuesday, December 16, 2008 12:02 PM
To: Fisher,
I used winzip 12.0 to zip a file and used the code below to successfully unzip
it.
===
#!/usr/bin/perl -w
use IO::Uncompress::AnyInflate qw(anyinflate $AnyInflateError) ;
@ARGV == 2 or die "Usage: $0 \n";
my $input=$ARGV[0];
my $output=$ARGV[1];
if ( -f $input ) {
} else {
print "Input fi
