dear price,
Again Sorry for the inconvenience.
data is : CDM210909 or FDM210909
probelm is : i need to split this word into CDM and 210909
--- ie, i wish to split this word into char (first 3 characters & remaining
)
@res=split( / .{3}/ , $data );
but i could'nt get the answer. can u ple
>>> Peter Guzis <[EMAIL PROTECTED]> 02/27/01 05:10PM >>>
This *should* work, but I haven't tested it out thoroughly. Be sure to
specify a length of time to sleep or it will wait forever.
##
if ('some condition' eq 'true') {
} elsif ($line =~ m/^PO1<<\d+ 3 && $limit{$desc};
>>> "Dirk Bremer" <[EMAIL PROTECTED]> 02/27/01 05:03PM >>>
Greg,
I had the same problem with the Net::Config module in a normal Perl script and
modified the code within Net::Config
if ($< == $> and !$CONFIGURE) {
# my $home = eval {(getpwuid($>))[7]} || $ENV{HOME};
# $file = $
Hi,
I\'ve installed the latest version of Active Perl, the DBI and the Sybase Driver
(with the ppm-module).
However, running a script, the following error occured:
install_driver(Sybase) failed: DBD::Sybase initialize: cs_ctx_alloc() failed at
C:/Perl/lib/DynaLoader.pm line 219.
Compilation f
On 27.02.01 at 17:22 Mark Meyer wrote:
Q. i wanted to point
>out that this information is available not only in the Camel book...
Thanks to all who provided info on this, however I was really looking
for your experience in real world applications more than the
documentation. I read the sections
rookie
How do you work with dates in OLE/Excel/perl?
$startJob = $workSheet->Range("J4")->{Value};
where J4 contains a date. Would like to use it
in perl time functions.
Could you use perl time to initialize a date cell?
Or do you have to format a date string?
Thanks
_
Thanks very much to the useful advice I had from the two lists, here's the
current situation + code.
Having spent most of yesterday in debugging mode it looks like the culprit
is the MIME::Entity object.
This Object ($entity) is NOT being destroyed when it goes out of scope,
however I could not f
Ron wrote:
> Try it with:
>
> $var1= "joe"; # a package var
You'll have to "use vars qw($var1);" if you're use-ing strict. Or qualify it
explicitly with $::var1 or $main::var1 (or $main'var1 if you're feeling
nostalgic). Or use our.
>
> instead of:
>
> my $var1 = "joe"; # a lexical var
>
> Y
Michael Marziani wrote:
> simply change the line:
>
> > push(@Files, $_) #in your sub wanted
>
> to
>
> push( @Files, "$File::Find::dir/$_" );
>
> The $File::Find::dir variable always holds the current full working
> directory while in wanted(), so each of your @Files will be
> ful