Webmaster Forum / Perl / Getting Started / November 2006

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
I am trying to get this to take random amount of widths and compute
the square footage for each.  For example:

I am new to perl and have a doubt. I have a script that needs to run a
command. The command that is being run requires input from the user to
proceed. Instead of prompting the user how can I code the utility to not
prompt the user but take the input from a variable that has the ...

Hi: I have a variable called $agent_id and want to create a string with the value of $agent_id followed by "-str". The following does not seem to work.
The following example I want to create a variable called $35-str.
$agent_id = 25;
$agent_id."-str" = "This is test\n";

hi Gurus,
I have a problem to replace strings of file thru perl script.
Here is the problem in detail...
I have a text file  some thing like this..

Do you use the regular "#" or inline POD statements?
Robert

I have two arrays . one array contains the element which needs to be
deleted from the secound array in which that element is already present.
I have tried using delete function but somehow i did not succeed.
Could somebody please help me on this

Who cabeginnersn help me to explain the reason?
$ perl -e '$_="a11\nb22\nc33\n"; print $_, "-"x15, "\n";s/^a.*^b.*/x/m; print'
a11
b22

I'm writing a perl application using Tk for the gui, and wish to write
formatted
output to a logging window within the gui. But I cannot get write to do
as I wish,

Can you tell me what's this string?
=?GBK?B?zNSxpszh0NHE+qO6wvS80tLRvq3GwLzbo6zH67vYxsA=?=
How to decode it?I try:
$ perl -MEncode -le 'print

I have a number of jpegs I wanted to rename. I wrote a short script
to do it but the new file name is not always generated correctly. The
script should find the last letter in the filename (before the
extension) and substitute it for '_a'.

           Could you please suggest me any good PERL editor which is
available in open source tools.  I have tried 'EngineSite Perl Editor
-LITE' and 'PerlExpress' which I am not comfortable with. Kindly refer
me some good bug free tools.

I'm on the Interchange mailing list (icdevgroup.org) and we've found a
problem with our Interchange::Link perl module for apache2.  I don't
know perl myself, and I was wondering if anyone here might be able to
help fix it.

I have two files :
File A contains the following :
((((9,(6,8)),((4,((3,2),1)),5)),(12,11)),(13,(7,10)));
File B contains the follwoing:

Can someone tell me please why i'm getting this error with this code ?
I'm running PERL 5.6.0 on a AIX.
Any help would be appreciated.
Warm Regards,

I've been using something like this for Oracle for some time
and tried it with Postgresql.
(RaiseError doesn't change the outcome)
  sub insert_token {