Chas Owens wrote:
> On 3/20/07, Mathew Snyder <[EMAIL PROTECTED]> wrote:
> snip
>> $timeworked =
>> $env{$transaction->Creator}{$transaction->TimeTaken};
> snip
>
>> From this line you can see that %env is a HoH (hash of hashes). This
> means that if you want to print it out you n
On 3/20/07, Mathew Snyder <[EMAIL PROTECTED]> wrote:
snip
$timeworked =
$env{$transaction->Creator}{$transaction->TimeTaken};
snip
From this line you can see that %env is a HoH (hash of hashes). This
means that if you want to print it out you need two loops: one for the
firs
Rob Dixon wrote:
> Mathew Snyder wrote:
>>
>> I have a problem printing out a hash. This is the script I'm working
>> with:
>> #!/usr/bin/perl
>>
>> use warnings;
>> use strict;
>> use lib '/usr/local/rt-3.6.3/lib';
>> use lib '/usr/local/rt-3.6.3/local/lib';
>> use RT;
>> use RT::Tickets;
>>
>> R
Mathew Snyder wrote:
I have a problem printing out a hash. This is the script I'm working with:
#!/usr/bin/perl
use warnings;
use strict;
use lib '/usr/local/rt-3.6.3/lib';
use lib '/usr/local/rt-3.6.3/local/lib';
use RT;
use RT::Tickets;
RT::LoadConfig();
RT::Init();
my $tix = new RT::Ticke
Jeff Pang wrote:
>> Jeff Pang wrote:
foreach my $key (keys %$env) {
print $key . " -> " . $env{$key} . "\n";
}
>>> Hello,
>>>
>>> For a quick look,the codes above may not work.
>>> Since $env is a hash reference,so you can't say $e
I got this Perl script that recurses through a tree and converts images that
you can make use of...
http://www.ecf.utoronto.ca/~goodi/files/thumbnail_creator.pl
Its under the MIT license (
http://www.ecf.utoronto.ca/~goodi/html/software.html) which basically says
you can do whatever you want with
>
>Jeff Pang wrote:
>>>foreach my $key (keys %$env) {
>>>print $key . " -> " . $env{$key} . "\n";
>>>}
>>
>> Hello,
>>
>> For a quick look,the codes above may not work.
>> Since $env is a hash reference,so you can't say $env{$key} to access
Jeff Pang wrote:
>>foreach my $key (keys %$env) {
>>print $key . " -> " . $env{$key} . "\n";
>>}
>
> Hello,
>
> For a quick look,the codes above may not work.
> Since $env is a hash reference,so you can't say $env{$key} to access the
> hash
>foreach my $key (keys %$env) {
>print $key . " -> " . $env{$key} . "\n";
>}
Hello,
For a quick look,the codes above may not work.
Since $env is a hash reference,so you can't say $env{$key} to access the hash's
value.
It may change to:
pr
Also, I've read the *perldsc* perldoc and it didn't help undo my confusion.
Mathew
Mathew Snyder wrote:
> I have a problem printing out a hash. This is the script I'm working with:
> #!/usr/bin/perl
>
> use warnings;
> use strict;
> use lib '/usr/local/rt-3.6.3/lib';
> use lib '/usr/local/rt-3.
Also, I've read the *perldsc* perldoc and it didn't help undo my confusion.
If we don't protect the freedom of speech, how will we know who the assholes
are?
http://theillien.blogspot.com
Mathew Snyder wrote:
> I have a problem printing out a hash. This is the script I'm working with:
> #!/usr/
I have a problem printing out a hash. This is the script I'm working with:
#!/usr/bin/perl
use warnings;
use strict;
use lib '/usr/local/rt-3.6.3/lib';
use lib '/usr/local/rt-3.6.3/local/lib';
use RT;
use RT::Tickets;
RT::LoadConfig();
RT::Init();
my $tix = new RT::Tickets(RT::SystemUser);
$tix
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
Rob Dixon wrote:
> Chris Parker wrote:
>>
>> Hello all,
>>
>> How do I get text out of a tiff image? Scenario is that I have alot of
>> directories named (ex. 000, 020, 000) with files inside along the same
>> line ( 000.tiff, 034.tiff) and I need to
On 03/20/2007 05:21 PM, Vladimir Lemberg wrote:
Hi All,
My script is calling a Win32 program with two arguments:
system ( "$ARGV[0]\\program.exe", $File::Find::name, "$ARGV[0]\\source");
I want to capture STDOUT and STDERR from the program to log file
system ( "$ARGV[0]\\program.e
Hi David,
Would you please send this portion to me?
Thanks,
Vladimir
- Original Message -
From: "Wagner, David --- Senior Programmer Analyst --- WGO"
<[EMAIL PROTECTED]>
To: "Vladimir Lemberg" <[EMAIL PROTECTED]>;
Sent: Tuesday, March 20, 2007 3:54 PM
Subject: RE: capture stdin and
> -Original Message-
> From: Vladimir Lemberg [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, March 20, 2007 15:21
> To: beginners@perl.org
> Subject: capture stdin and stderr
>
> Hi All,
>
>
>
> My script is calling a Win32 program with two arguments:
>
> system ( "$ARGV[0]\\program.exe"
Hi All,
My script is calling a Win32 program with two arguments:
system ( "$ARGV[0]\\program.exe", $File::Find::name, "$ARGV[0]\\source");
I want to capture STDOUT and STDERR from the program to log file
system ( "$ARGV[0]\\program.exe", $File::Find::name, "$ARGV[0]\\source",
1>"$ARGV
Flemming Greve Skovengaard wrote:
>
> John W. Krahn wrote:
>>
>> Flemming Greve Skovengaard wrote:
>>>
>>> $rand_string .= $letters[$index];
>>
>> Or simply:
>>
>> $rand_string .= $letters[ rand @letters ];
>
> Yes, that would save a line of code, a variable and a call to scalar().
> B
> oryann9> All,
> oryann9> Is the Perl template toolkit a popular tool
> to use for
> oryann9> mid tier to senior Perl developers?
>
> I'm about as senior as they get for Perl developers
> {grin}, and it's clearly
> my templating language of choice.
>
OK great, Thx for responding! I read the CP
John W. Krahn wrote:
Flemming Greve Skovengaard wrote:
Travis Thornhill wrote:
I need to make strings of variable length for testing inputs.
The strings can contain any letter, say 'a', and I need to be able
to create the string with
255, 256 or any length.
Is there a quick and easy wa
On 3/20/07, Dukelow, Don <[EMAIL PROTECTED]> wrote:
Next I'm tiring to increment a scalar variable name by one each time
through a for loop.
$pid1
$pid2
$pid3
And so on
You really want to use an array. Because Perl has arrays, it neither
needs nor provides a way to "increment" variable names.
On 3/20/07, Beginner <[EMAIL PROTECTED]> wrote:
Hi,
I have a large, 1.3GB xml file that I was trying to validate. It
turns out that the file has a lot of exotic characters in it such as:
é
è
Ä
È
...etc
The area of encoding and internationalisation is one I have no
experience of at all and from
On 3/20/07, Dukelow, Don <[EMAIL PROTECTED]> wrote:
First off thanks to the several e-mail I got for my old way of thinking
with the divide question I had earlier this morning.
Next I'm tiring to increment a scalar variable name by one each time
through a for loop.
$pid1
$pid2
$pid3
And so on
On 3/20/07, Rob Dixon <[EMAIL PROTECTED]> wrote:
snip
You seem very indignant that Perl is offering you a floating-point result -
it started giving 24.5 right at the beginning of its life! What are these
languages you have used that give only an integer result for division? I
can think of none of
You can get the hex values from http://ascii-table.com/img/table-apple.gif
You can escape them with \xdd where dd is the 0xdd hex value.
eg
s/[\x80-\xFF]/\?/
On 3/20/07, Beginner <[EMAIL PROTECTED]> wrote:
Hi,
I have a large, 1.3GB xml file that I was trying to validate. It
turns out that the
First off thanks to the several e-mail I got for my old way of thinking
with the divide question I had earlier this morning.
Next I'm tiring to increment a scalar variable name by one each time
through a for loop.
$pid1
$pid2
$pid3
And so on
The code I'm running is
54 For (my $n = 1; $n <= $FOR
> "oryann9" == oryann9 <[EMAIL PROTECTED]> writes:
oryann9> All,
oryann9> Is the Perl template toolkit a popular tool to use for
oryann9> mid tier to senior Perl developers?
I'm about as senior as they get for Perl developers {grin}, and it's clearly
my templating language of choice.
--
R
> ""Chas" == "Chas Owens" <[EMAIL PROTECTED]> writes:
"Chas> Look at the Par* module
That's "PAR", not "Par". Case matters. Please use the right case
when talking about modules, as it will make it easier to locate and use.
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1
On 3/20/07, Rodrigo Tavares <[EMAIL PROTECTED]> wrote:
Hello,
I made a script with shell script using dialogs.
I try to use the commando Dialog in a perl script.
But i can't run the dialog in perl script.
snip
What have you already tried to do? It should be as simple as
#catch the output of
Hi,
I have a large, 1.3GB xml file that I was trying to validate. It
turns out that the file has a lot of exotic characters in it such as:
é
è
Ä
È
...etc
The area of encoding and internationalisation is one I have no
experience of at all and from what I've heard it is rather complex
and difficult
From: hOURS <[EMAIL PROTECTED]>
> if ($return =~ / syntax OK$/) {
> print "$progname is OK\n";
> } else {
> print "$progname has errors\n";
> }
> }
>
> HTH, Jenda
>
>
>
> Thanks Jenda,
> I definitely do just want to check syntax and not execute the scripts.
>
> I r
Don Dukelow wrote:
I have a script where I have to divide and all I want is the hole
number, not the decimal point.
When I do
$num = 2;
$count = 49;
$count /= $num;
$count comes out 24.5, I thought I would get 24. If I wanted the
remainder I WOULD DO.
$count %= $num; which does work. When d
On Wednesday 21 March 2007 00:34, Dukelow, Don wrote:
> and this works. But every other language I've programmed in anything
> dividing with "/" you only get the hole number why?
That's because you've only used languages that aren't a very good abstraction
of the underlying machine. Many common l
Hello,
I made a script with shell script using dialogs.
I try to use the commando Dialog in a perl script.
But i can't run the dialog in perl script.
Can perl use windows softwares ?
I belive this true.
What is the software ?
best regards,
Rodrigo Faria
I have a script where I have to divide and all I want is the hole
number, not the decimal point.
When I do
$num = 2;
$count = 49;
$count /= $num;
$count comes out 24.5, I thought I would get 24. If I wanted the
remainder I WOULD DO.
$count %= $num; which does work. When did Perl start giving 2
Hi;
I'm trying to install this script, but get this error:
Can't connect: IO::Socket::INET: Bad hostname 'server435:51253'
Test server timeout
How can I change that manually? Here's the code from the Makefile:
require 5.005;
use strict;
use ExtUtils::MakeMaker qw(WriteMakefile prompt);
use Confi
Great! Thanks to both of you!
Stan2
Jeff Pang <[EMAIL PROTECTED]> wrote:
>Hi;
>I need to add a line that calls a shell script to a perl script I found. Is it
>as simple as just adding the path of the script?
>
>else
>/usr/local/bin/my_script.sh
>
Hello,
You could write it like:
system "/u
DISCLAIMER:
---
The contents of this e-mail and any attachment(s) are confidential and intended
for the named recipient(s) only.
It shall not attach any liability on the originator
DISCLAIMER:
---
The contents of this e-mail and any attachment(s) are confidential and intended
for the named recipient(s) only.
It shall not attach any liability on the originator
39 matches
Mail list logo