CLE_HOME is pointing to the 64 bit drivers so I
am at a bit of a loss as to why it’s expecting a 32 bit dll. I have
verified the dll is in that path. Any ideas? I’ve Googled a bit and can
find a bunch of hacks but….Any help would be most appreciated.. flk k
can you help explain the code below?
I don't know why the "ref" and "scalar" functions here can be used to
validate if it's ASCII or UTF8 encoding.
use constant ASCII => ref eval {
require Encode;
Encode::find_encoding('ascii');
};
use constant UTF8 =>
write several commands to the handle and read the output of each
command..
Would someone suggest a solution which would allow me to "open" a read/write
session to a command line??
Thanks in advance.. flk k
Thanks for the hint.. And I was looking forward to a night of heavy
drinking.. Oh well, might as well code into the night..
Thanks again.. flk k
-Original Message-
From: Shawn H Corey [mailto:shawnhco...@gmail.com]
Sent: Wednesday, November 19, 2014 5:09 PM
To: beginners@perl.org
Have a hash of arrays.. i.e.
$hash{one}[0] = "value 10";
$hash{one}[1] = "value 11";
$hash{one}[2] = "value 11";
$hash{one}[3] = "value 13";
$hash{one}[0] = "value 20";
$hash{one}[1] = "value 21";
$hash{one}[2] = "value 22";
$hash{one}[3] = "value 23";
If I had two arrays and wanted
I had this in my temp file:
abc 123 53432 t...@gmail.com
abc 123 53432 t...@gmail.com
abc 123 53432 t...@gmail.com
abc 123 53432 t...@gmail.com
abc 123 53432 t...@gmail.com
Running the following command:
perl -n -e 'm/.* ([^ ]+@.*)$/i; print $1."\n"' temp
will print:
t...@gmail.com
t...@gmail.
You can try the following regexp:
.*([^ ]+@.*)$
This assumes that the email address is the last string and all strings are
space separated.
-- Fruit Vendor
On Sun, Jul 13, 2014 at 3:43 PM, ESChamp wrote:
> I apologize for having to ask this but my nearly-80-year-old brain just
> could not c
Can you use LWP::Simple?
use LWP::Simple;
my $content = get("http://www.google.com/";);
--
Matthew Kunzman
Software Engineer
Boise, ID USA
Email: matt_...@rocketmail.com
Website: http://www.mattkunzman.com
LinkedIn: http://www.linkedin.com/pub/matthew-kunzman/b/5ba/94a
-
There are a few ways to do it. It's hard without knowing the data. You could do:
$text =~ /Critical Alarm Present([^\.]+)./ ? print "$1\n" : print 0; ; # if
they all end with a period
$text =~ /Critical Alarm Present(.*)Recent Device Events./s ? print "$1\n" :
print 0; # if Recent Device Event
Gosh, I always thought "$$" is what you have to pay when you get a divorce
.. flk k
-Original Message-
From: Dr.Ruud [mailto:rvtol+use...@isolution.nl]
Sent: Friday, May 17, 2013 7:47 AM
To: beginners@perl.org
Subject: Re: What does $$ mean ?
On 17/05/2013 14:39, *Shaji
I am not an expert in Perl, but wouldn't
$test_data =~ s/north/N./gi;
be sufficient?
Regards,
Tushar Jain
On Mon, Jan 28, 2013 at 2:42 PM, Nathan Hilterbrand wrote:
> On 01/28/2013 02:57 PM, Angela Barone wrote:
>
>> Hello,
>>
>> I'm trying to abbreviate ordinals(?) that occur only in
#!/usr/bin/perl
use LWP::Simple;
my $url = 'your website'
my $content = get("$url");
print $content;
--
Matt
>
> From: Formatting Solutions
>To: beginners@perl.org
>Sent: Wednesday, May 9, 2012 8:11 AM
>Subject: Scraping non-html webpage in Perl
>
>Hi,
>
>I wo
Mark,
It seems like you have a hammer, and you really want this to be a nail. It just
isn't. It's more like a paper clip.
Perl and PHP are both server side scripting languages, which means they run on
the server. If you use them, you should pick one because they serve the same
purpose. You d
Mark,
- Original Message -
> From: Mark Haney
> To: Perl Beginners
> Cc:
> Sent: Wednesday, April 25, 2012 11:51 AM
> Subject: PERL CGI, HTML and PHP
>
> I've got, what I hope is a fairly simple problem that someone can point me
> to the best (or best practices anyway) way to handle i
How secure is this transfer? Is this server to server within the network, or
across the Internet?
If it remains local, Net::FTP is probably the route you want to go. Just do an
$ftp->ls() and do a $ftp->get() on files that match a regex pattern.
If it is not, then you might want to either PGP
Hello All,
I have a file like this:
NM_009648,NM_001042541:10.955794504181601
NM_019584:1 0.900900900900901
NM_198862:1 0.835755813953488
NM_001039093,NM_001039092,NM_153080:1 0.805008944543828
and want output like this:
NM_009648 0.955794504181601
NM_001042541:1 0.955794504
Hello - I am new to Perl, and looking for some much needed direction.
I am trying to get a basic formula in place (within an existing IF
statement) that will serve to increase my price (i.e., "$new_price")
by the following formula:
=PRICE divided by 0.8 plus 15
In other words, if the Price is e
On Monday 25 Apr 2011, Shlomi Fish wrote:
> On Sunday 24 Apr 2011 21:01:57 Shawn H Corey wrote:
> > On 11-04-24 10:36 AM, Akhthar Parvez K wrote:
[ snip ]
> > I still think I have to disagree. Sometimes interviewers ask purposely
> > obscure questions not to see if you know
On Sunday 24 Apr 2011, Shawn H Corey wrote:
> On 11-04-24 09:48 AM, Akhthar Parvez K wrote:
> > #5 - Never give a wrong answer - If at all you receive a question that you
> > don't know, do not panic, just be smart and divert the question so you can
> > answer what y
ould let you handle the interview in the best possible way.
#5 - Never give a wrong answer - If at all you receive a question that you
don't know, do not panic, just be smart and divert the question so you can
answer what you know.
#6 - Please your interviewer with well explained respon
;
> # print "Found\n";
> }
> }
> }
>
>
#read MSRT first
@msrt = ;
chomp(@msrt);
#perform the check while reading Test_server
while ($tom = )
{
chomp($tom);
my @result = grep { /\Q$tom\E/ } @msrt;
print "$tom: @result\n" if @result;
}
#T
On Jan 23, 2:55 am, jwkr...@shaw.ca ("John W. Krahn") wrote:
> Peter K. Michie wrote:
> > I have this regex expression in a script that appears to do an array
> > like split of a string but I cannot figure out how it does so. Any
> > help appreciated
>
> &
I have this regex expression in a script that appears to do an array
like split of a string but I cannot figure out how it does so. Any
help appreciated
$fname = ($0 =~ m[(.*/)?([^/]+)$])[1] ;
print "7 $errlog\n";
$fpath = ($0 =~ m[(.*/)?([^/]+)$])[0] ;
print "8 $errlog\n";
The array elements 0
ust the following simple regex would do, right?
/.*(E)/
or did I miss another important criteria? If so, please excuse me for I'm
probably not concentrating enough now. Might be because it's being late night
over here. Good nite/day!
--
Regards,
Akhthar Parvez K
http://www.sysad
red in perl4.
> it shouldn't be used in perl5 calls unless you know why and it is a very
> special case.
Thanks for clarifying that.
--
Regards,
Akhthar Parvez K
http://www.sysadminguide.com/
UNIX is basically a simple operating system, but you have to be a genius to
understand
signatures.
>
> like i just did to the whole email you quoted.
>
Well, I hope that was an aberration as I usually do bottom postings only.
Apologize for any inconvenience brought to you.
--
Regards,
Akhthar Parvez K
http://www.sysadminguide.com/
UNIX is basically a simple oper
outine
I remember I'd read in the past that & should be used in such cases so that
Perl can easily recognize I'm attempting to call a subroutine, correct and/or
is that (only) required with older versions?
--
Regards,
Akhthar Parvez K
http://www.sysadminguide.com/
UNIX is basically a
Hi Henning,
$catch = $1 if ($string =~ /.*(E)\d*\b/);
you can use this to test it:
$catch = $1 if ($string =~ /.*(E\d*)\b/);
--
Regards,
Akhthar Parvez K
http://www.sysadminguide.com/
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity
> -stevieb
>
> ps: % perl -e 'print "Not Another Perl Hacker"'
>
>
>subject: A story
.. and a good one at that :-)
--
Regards,
Akhthar Parvez K
http://tips.sysadminguide.com/
UNIX is basically a simple operating system, but you have to be a genius to
understand t
they were
two separate regex expressions. Sorry for that!
my $rx1 = qr{ ab(cd) }mx;
my $rx2 = qr{ (pq)rs }mx;
So could you tell me how would you write the statement now?
--
Regards,
Akhthar Parvez K
http://tips.sysadminguide.com/
UNIX is basically a simple operating system, but you have to b
On Saturday 22 May 2010, Jim Gibson wrote:
> On 5/21/10 Fri May 21, 2010 12:13 PM, "Akhthar Parvez K"
> scribbled:
> > Shouldn't
> > Perl be smart enough to understand that the outer most pair of paranthesis
> > and
> > | symbol were solely used f
nwanted delay if there are more strings to be matched, so
I thought to get it done in a single statement, or a group of statements,
without any loop. The above regex method worked for me, except it gave me some
undefs as well. Is there any way I can get rid of them by using the same
statement
On Friday 21 May 2010, Akhthar Parvez K wrote:
> Look at this code:
>
> my @data = ( 'Twinkle twinkle little star
> How I wonder what you are
> Up above the world so high
> Like a diamond in the sky.
> 123
> Twinkle twinkle little star
> How I wonder what you are&#
like it was not picked because some part of the string was
already picked by another regex. How can I get the expression pick that as well
so the output would be like below:
result: $VAR1 = [
'little starHow I wonder',
'what you areUp above the world'
grep show only the matched string like Unix egrep -o or Perl regex?
--
Regards,
Akhthar Parvez K
http://tips.sysadminguide.com/
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennis Ritchie
--
To unsubscribe, e-mail: beginners-uns
On Thursday 13 May 2010, Akhthar Parvez K wrote:
> On Thursday 13 May 2010, Shlomi Fish wrote:
> > Then it is very likely that the memory allocated to the "mem" pointer will
> > not
> > be returned to the kernel due to the nature of malloc() and how it is
am is forking
that part of the program so that it will run as a child process and return all
the memory used by it back to the system. Please correct me if I am wrong.
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to b
l won't need to grow its size if it can
> reuse lexical data that is reclaimed upon scope exit.
>
Doesn't Perl free up any memory that was used by it until the program exits? If
that's how it goes, if a Perl program uses a lot of memory at the beginning and
it takes
y that's used to allocate a
variable defined with 'my' will be freed up once the current lexical scope is
exited?
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicit
"vvw" => "\%vvw_dirs" );
Remove the quotes. When you put something around quotes, you're telling it's a
string and a reference is not a string as you know.
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
31" => "dir32", "dir33" => "dir34" );
# PKV
my %pkv_dirs=( "dir41" => "dir42", "dir43" => "dir44" );
# VVW
my %vvw_dirs=( "dir51" => "dir52", "dir53" => "dir54" );
#
is
not the argument list of another subroutine inside that.
>>print N(@_#HERE)
Why are you calling the subroutine N? Have you already defined a subroutine
with the name N in your program?
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, b
ays if everything is OK
(you may do occassionally), but if anything failed :-)
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
--
To unsubscribe, e-mail: b
e explanation John. Could you give one or two real time examples
where you used a list (instead of an array) except in loops such as: for ('a',
'b', 'c', 'd')? I wonder if I'm underusing lists in my Perl programs.
--
Regards,
Akhthar Parvez K
htt
as RAID, it's important to have a live monitoring
system such as nagios so that you'll never miss out on such things. At the end
of day, it comes down to how you manage what you have got in your hands.
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simpl
- But what if
the file is huge?
2. Opening filehandles again and again - would cause I/O overhead
3. any other method?
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
statement, loop is processed whilst the file is being
read and hence it's more appropriate. So while would be a better choice, more
so if the file size is higher and there's a scope of closing the file before
it's read completely.
That's what I understood. Please correct
production code - it's a very bad
> idea.).
Thanks Shlomi for the explanation. I was amazed with some of the Perl tricks,
so wondering if it can go to that extent to blow me out completely.
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating sy
ehandle and the
scalar variable. Is Perl too intelligent to recognize both of them?
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
--
To unsubscribe, e-mail: beginners-un
program here, I
think he should state clearly what he wants to do as it will help both parties
(those who seek help and those who help) and eventually the resolution would be
faster.
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but
0];
Nice to see all these explanations coming in. Thanks Charles :-)
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.
r functions inside it.
Correct and thanks for clearing my misconception! Is there any way to catch
only the second return value then? I am not so sure but I think I had done it
in the past using the method that I mentioned earlier (or similar).
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.
On Thursday 29 Apr 2010, Shlomi Fish wrote:
> On Thursday 29 Apr 2010 14:39:11 Akhthar Parvez K wrote:
> > There was a typo in my original email. I missed the word "not" which was
> > very crucial as always.
> >
> > Scenario: #1
> > unless ( (define
quot; a few
years back, but haven't been into scripting except Shell for the past few years
and may be due to that, lost on that completely. But with you guys' help, I
have polished it back now. :-)
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple ope
at)
Anything wrong with this method? If so, what's the correct method then?
--
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
On Thursday 29 Apr 2010, Shawn H Corey wrote:
> !( A && B ) === !A || !B
Thanks Shawn, had learnt it a few years back, but forgot that it seems and
eventually got confused :-)
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you
ESS $test does
not contain TEST), but not the scenario #1.
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
On Thursday 29 Apr 2010, Akhthar Parvez K wrote:
> Hi,
well for me,
but I'm getting the following warning:
Scalar value @_[0] better written as $_[0]
I hate warnings, but how can I fix that? As I said, $_[0] doesn't work. Can
someone shed some light on this?
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simp
SS $test does
contain TEST), but not the scenario #1.
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For addi
for the next one which produces the errors mentioned, only a few lines
> later!
So you have fixed those lines as well, good :) Btw, the messages you received
were "warnings", not errors I guess.
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple
($fred != $href->{fred})
{
print "fred failed.\n";
}
}
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
--
To unsubscribe, e-mail: beginners-unsubsc
ne 232.
>
> Could somebody please tell me why this doesn't work?
Most probably you have used an undefined scalar in an expression. Would be good
if you can mention the lines along with the line no.
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating
reference as an argument while calling the function. Do remember
that you can't pass the hash to a function, but just the hash reference. Also
minimize (or even avoid) the use of declaring with "our", use argument passing
instead.
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUI
t; tried this below, but it doesn't match correctly.
if ($string =~ /^[\w\s]*$/) {print "$string\n";}
else {print "Invalid Keyword. Please check and try again\n";}
Audio A4 Quattro -> Audio A4 Quattro
Tom & Jerry -> Invalid Keyword. Please check and try aga
uninitialized value in concatenation (.) or string at
scripts/test/test2.pl line 14.
extracted:
But it worked for the OP (the above condition may not have been required for
him) and that's what is important :-)
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a sim
Hi,
> It works fine and I like it. My regex is not that good, but I can see what
> is doing. I modified it a bit (to capture up till a full stop sign).
Kewl. Good to hear that!
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you h
Hi Shawn,
> $str =~ m{ \A ( .{15} .*? ) \s }msx;
I don't think this would work if the value given in the match string (15 as per
above eg.) is greater than the character count of the particular string. Right?
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically
ints:
The black cat climbed the green tree
My knowledge in Perl is limited, so there may be a more apt solution in your
case.
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Ric
Got that, thanks Shlomi! However, can this be done by referencing $1 directly
with strict refs on? I definitely feel it can be done and would be nice to know
how!
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
while "strict refs" in use at test.pl
I tried to overcome this issue using scalar(), but didn't help. Could someone
please let me know what is the workaround here. Thank you!
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, b
an alternative that would work in my case as well.
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
On Thursday 08 Apr 2010, Rob Coops wrote:
> On Thu, Apr 8, 2010
help me to set this up?
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginner
Excellent, John. Didn't know that Perl only deals with decimal numbers. Funny
thing was I did think that it could be a hex, so converted it to binary and
done an AND, but didn't get the desired result. Wonder why I didn't give a
thought that it could be decimal!
Regards,
Akhtha
e given directory is having 1777 perm
mode?
Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to
understand the simplicity - Dennie Richie
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
Hi ALL
I am planning to start programming perl for my project . i am just a
beginner to perl
can i get information related to videos/links and books especially for
beginners which can help me writing scripts .
Thanks
n Wed, Jan 27, 2010 at 6:28 PM, John W. Krahn wrote:
> V U Maheswara rao k wrote:
>
>> HI ,
>>
>
> Hello,
>
>
> I have to get only error messages and warnings text form
>> "/var/log/messages".
>>
>> I wrote below code for to get only &quo
HI ,
I have to get only error messages and warnings text form
"/var/log/messages".
I wrote below code for to get only "warnings, error and caution " messages
from a file.
but grep command wont work. because I have to pass scalar variable to
search.
#!/usr/bin/perl
use warnings;
use strict;
open
Hi All,
can I convert perl file into binary file? So that my code will be secure/.
--
-Mahesh
This is how I got it to work. However any STDOUT completion messages will need
to be done outside the brace.
}
local *STDOUT;
if ( $GlblInfo{audit} ) {
printf "All STDOUT/STDERR will be assigned to this scripts audittrail
log!!\n";
printf "All STDOUT/STDERR will be assigned to this s
- CFS
[mailto:david.wag...@fedex.com]
Sent: Thursday, July 16, 2009 1:46 PM
To: Patrick K Christopher TANAGER; beginners@perl.org
Subject: RE: While issues
> -Original Message-
> From: Patrick K Christopher TANAGER
> [mailto:pchristop...@tanagerinc.com]
> Sent: Thursday, July 16
I can't seem to find this oddness in this script.
#! /usr/bin/perl
open(FH,"<$ARGV[0]") || die ("File failed to open!\n");
open(FO,">$ARGV[1]") || die ("Output failed to open!\n");
while (){
s/,//g
print (FO);
}
close (FH);
close (FO);
open(FH1,"$ARGV[2]").
The problem is the first whil
I was installing PDF::Create with cpan under cygwin and it "suggested"
that I upgrade cpan by also installing Bundle::CPAN. I tried that and
now I have a mess.
Whenever I try to install a new module now, I get this error:
CPAN: Compress::Zlib loaded ok
Can't call method "value" on an undefined v
Hi
Mails which are send by the perl script are usually found in the SPAM or
JUNK as a result most of the mails are not seen by the recipient. Is
there any way in the perl script we can set some Magical Header :) by
which the mail goes to INBOX only. First of all can we do in the perl
script o
Hi
In java we have instance operator to tell the type of Object.
Similarly in perl say I am passing a reference object to a function,
Is it possible to detect in the function whether the object is HASH or
ARRAY...
Thanks
Anish
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional comma
Hi
The Parameter value passed from the main PL file to the subroutines are
not passed correclly in the same order
say the class Id and schoolname are passed correctly as "70" and "ABC".
But in the subroutine when I print it is not correct. Some Junk value. I
think this is something to do with
Hi
I am trying you to use this piece of code to send mail frm the HTML
form. But I am not getting any mail as well as no error message. I am
using sendmail to send the attachement. Any help is nice
my $picture=PATH OBTAINED FROM THE HTML FORM for example; c:/a.jpg
my $sendmailpath="/usr/sbin
Hi I have a series of HTML tags in one file and want to convert to a DOC
file how is it possible. Do we have any specific modules
For Ex:
Read a HTML file write to a document
Read the Second HTML file and write to the same document (Append)
Thanks
Anish
--
To unsubscribe, e-mail: [EMAIL PROTEC
Hi folks,
I'm porting a script to Windows, and I've run into an
odd mismatch between the results returned by "glob" and the
-f operator. If I take a test script like the following:
my @files = glob ("*.exe");
for my $f (@files) {
print "Processing \"$f\"...\n";
-f $f &&
ings as well.
It is usually best to avoid using variables which are not
local to a sub routine inside a sub routine, though there are
cases where this it is desirable and good programming practice.
HTH,
Charles K. Clarkson
--
Mobile Homes Specialist
Free Market Advocate
Web Programmer
25
blem with
write_col() or with the setup for the object $worksheet.
If it does test okay then the problem may be in the
data manipulation just before the call to write_col().
HTH,
Charles K. Clarkson
--
Mobile Homes Specialist
Free Market Advocate
Web Programmer
254 968-8328
http://www.cl
rse @ascending_indexes ];
print "\n\n";
print "Descending sort then ascending sort\n\t";
printf '%5d', $_ foreach @occ_count[ @descending_indexes ];
print "\n\t";
printf '%5d', $_ foreach @unique[ @descending_indexes ];
print "\n";
__END__
eing just a little contrite.
Charles K. Clarkson
--
Mobile Homes Specialist
Free Market Advocate
Web Programmer
254 968-8328
http://www.clarksonenergyhomes.com/
Don't tread on my bandwidth. Trim your posts.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
Try Perl2Exe http://www.indigostar.com/.
the only drawback i found is that the size of exe is huge.
Krishnakumar K.P
-Original Message-
From: kilaru rajeev [mailto:[EMAIL PROTECTED]
Sent: Wednesday, November 22, 2006 11:08 AM
To: Dharshana Eswaran
Cc: beginners@perl.org
Subject: R
http://www.textpad.com/ is also very good.
-Original Message-
From: Todd W [mailto:[EMAIL PROTECTED]
Sent: Wednesday, November 22, 2006 1:40 AM
To: beginners@perl.org
Subject: Re: Hello to Perl World
"Tom Smith" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> If you
e):
Script: http://www.clarksonenergyhomes.com/chakrabarti.txt
Module: http://www.clarksonenergyhomes.com/chakrabarti.pm
HTH,
Charles K. Clarkson
--
Mobile Homes Specialist
Free Market Advocate
Web Programmer
254 968-8328
http://www.clarksonenergyhomes.com/
Don't tread on my bandwidth.
Hui Wang <mailto:[EMAIL PROTECTED]> wrote:
: I can make my program do its job at last, but it runs
: slowly. Can anybody tell me how to improve the running
: speed of this program?
You only provided the module. Can you supply a
working example? Something we can actually run?
HTH,
Cha
Dharshana Eswaran <mailto:[EMAIL PROTECTED]> wrote:
: The desired output should look like the following:
:
: 0x0a => 1010
: 0x23 => 00100011
:
: Can anyone suggest me for the same?
Read perlfaq4:
How do I convert between numeric representations/bases/radixes?
HTH,
Charles
storing of an object for later use is called serialization.
-Original Message-
From: Practical Perl [mailto:[EMAIL PROTECTED]
Sent: Tuesday, November 07, 2006 3:29 PM
To: beginners perl
Subject: about serialization
I saw a paper about DB_File,
Three serialization wrappers are
ou have a solution for the remaining value.
Try to solve the rest yourself. Come back here when you get
stuck solving a step.
print 1 % 25, "\n";
print 30 % 25, "\n";
print 300 % 25, "\n";
print 1234 % 25, "\n";
print 60001 % 25, "\n";
HT
array1. Elements in the other array should move also
: every 4 elements.
Can you explain that better? It really makes very
little sense. Ignore the script and just explain each step
you wish to take. Forget about h and k and the inner and
outer loop, just explain what you are trying to accomplish.
1 - 100 of 1201 matches
Mail list logo
