Here's a function I wrote to make this eaiser for myself... Might be
usefull, might not. It depends on you having a hash of data you want to
dump into a cgi table.
sub HashToTable
{
my $hashRef = shift;
my $orderRef = shift;
my $table_contents;
if($orderRef)
{
.PST files are those written out by Macrosloth Lookout. I'm guessing they
are streamed out COM representations.
Bruce W. Lowther
Demotivational quote for the day:
"(Don't worry if the concepts of variables and functions are not familiar;
we'll introduce these concepts as we go along.)" - Cross
cperl is a major mode in gnu/X emacs. It provides colorization, and is
syntax aware (well, as close as you can be to syntax aware with perl.)
for Graphical debugging, I use ptkdb. It's available from cpan. Once it's
installed, you can launch a debug session with the following command:
perl -d
Just a different spin on this one would be to create an array containing
sequential numbers, then shuffling them. This meets your criteria that they
be unique. However it adds an unspecified condition that all numbers in a
range are represented.
A good shuffle algorithm (fisher-yates shuffle)
As far as I can see, the prints for output are going to the console, not a
file. The statement you're referring to:
__END__
flat2rdb.pl sitelist.str.fo
has very little to do with the perl script. The __END__ tells the perl
interpreter to not compile/run anything after the __END__ line. So the
Perhaps the perl benchmarking would help out with this unit testing.
perldoc Benchmark
-Original Message-
From: John Peterson [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 14, 2001 10:11 AM
To: '[EMAIL PROTECTED]'; [EMAIL PROTECTED]
Subject: RE: Perl, Nice, and CPU Usage
Thanks for your
If you got it in a tar'ed package, it will come with a Makefile.PL script.
The general procedure is:
perl Makefile.PL
make test
make install {su'ed to root}
If you didn't get the tar'ed package, and just have .pm, then I would
recommend getting the tar'ed package instead. This would vary s
E: IDE for perl?
At 10:41 AM 5/9/01 -0600, blowther wrote:
>I recommend wscite when I teach perl classes. The code highlighting is
>pretty good. No inline debugger tho. We use ptkdb for graphical
debugging.
>--all of these are free.--
I think it's pretty clear, given the
I recommend wscite when I teach perl classes. The code highlighting is
pretty good. No inline debugger tho. We use ptkdb for graphical debugging.
--all of these are free.--
-Original Message-
From: Rod Suter [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, May 09, 2001 8:19 AM
To: [EMAIL PR
In other words, you need configure Windoz to add the data source. Start |
Settings | Control Panel | Data Sources (ODBC). You'll have to check your
manuals, what entries go in this section... (Beyond the scope of Perl
Beginners list).
Bruce W. Lowther
[EMAIL PROTECTED]
Micron Technology, Inc.
B
Here's one link to the perl DBI POD. It's the best POD documentation I've
seen. Kudos to the POD writers.
http://theoryx5.uwinnipeg.ca/CPAN/data/DBI/DBI.html
-Original Message-
From: Smith, Jim R [mailto:[EMAIL PROTECTED]]
Sent: Thursday, May 03, 2001 12:32 PM
To: [EMAIL PROTECTED]
Su
$fh = newopen("$datafile");
It looks like this line needs a 'my'
-Original Message-
From: Phillip Bruce [mailto:[EMAIL PROTECTED]]
Sent: Friday, April 27, 2001 7:47 AM
To: perl
Subject: Error
Hi,
I'm getting the following errror:
Global symbol "$fh" requires explicit package name
What's the email address for the perl advocacy email distro?
Bruce W. Lowther
Micron Technology, Inc.
Boise, Idaho
Just to clarify:
>From machine A you want to remotly execute a script on machine B?
If I understand your question correctly, you well have a hard time doing
that using Perl alone.
I would recommend looking and CYGNUS http://www.cygnus.com for information
about rsh on win32 platform.
If I'm not
Might be a phonetic thing... perhaps they are referring to the ksh (K
Shell)?
-Original Message-
From: Dennis Fox [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, April 24, 2001 5:38 PM
To: [EMAIL PROTECTED]
Subject: What is a "case shell"?
Here is a line from a job description that has me baf
I pretty printed for my own sanity:
use strict ;
my @vob_list = `cleartool lsvob | grep "*"`;
my $entry ;
foreach $entry (@vob_list) {
chomp $entry;
my @fields = split /\s+/, $entry;
my $tag_list ;
my $vbs_list ;
@tag_list = @fields[1] ;
@vbs_list = @fields[2] ;
foreach my $lock (@t
The Term::ReadLine package is one option.. You might also try the native
perl function getc.
Bruce W. Lowther
[EMAIL PROTECTED]
Micron Technology, Inc.
Boise, Idaho
-Original Message-
From: Goodman Kristi - kgoodm [mailto:[EMAIL PROTECTED]]
Sent: Monday, April 23, 2001 1:05 PM
To: '[EMAI
Remember you can always check the syntax of a perl script using the -c
option!
perl -c myscript.pl
One thing that frequently gets over looked is that you can run a script
through perl to check the syntax of a script. This quick check will point
out all sorts of details that are hard to see when
Something like this will work.
perl -pe "" foo.txt bar.txt > c:\temp\baz.txt
It's disappointing that
perl -p foo.txt bar.txt > c:\temp\baz.txt
doesn't work. It thinks foo.txt is the perl script to execute.
-Original Message-
From: Peter Scott [mailto:[EMAIL PROTECTED]]
Sent: Thursd
CVS Can be found at http://www.cvshome.org
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Thursday, April 19, 2001 9:52 AM
To: [EMAIL PROTECTED]
Subject: OK, Where is CVS?
I can't seem to find the CVS Client. I have looked in samba.org and have
perused th
Striping the zeros may not be necessary depending on what you are using the
$index and $value for. If you are actually going to use $index and $value
as numbers, the leading zeros won't matter. For example:
my $index = '0003';
print "Original: ";
print $index;
print "\n";
print "In a string
You could return the data by reference... The documentation is at
perldoc perlref
But in summary it would be
sub parse
{
my $hashRef = {};
$hashRef->{ONE} = 45;
return $hashRef
}
my $result = parse();
print $result->{ONE};
-Original Message-
From: Martijn v
So your saying that Perl can handle calculating cosine while iterating
through Pi?
for my $inc (-3.14159 .. 3.14159)
{
push @result, cos($inc);
}
Come on... C style for loops have their place.
-Original Message-
From: Brent Michalski [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, A
Geeze, these answers come in much faster than I can type...
I did want to check your use of an array... You're using hash access:
$array{0} = 'clk_n';
Shouldn't this be
$array[0] = 'clk_n';
-Original Message-
From: Prentice, Phillip R [mailto:[EMAIL PROTECTED]]
Sent: Monday, April 16
24 matches
Mail list logo
