Webmaster Forum / Perl / Getting Started / March 2009

I have tried a dozen different ways but can't retrieve an item from a
list box.  With a cursor on the item it is highlighted (= active?) but
code such as
$selected = $lbox -> get('active');

Please be patient with this beginner. I have a subrouting as follows,
that prints out an ASCII representation of chess board
sub display_board {
       foreach (0..7) {

Here is my problem;
I have a series of arrays with 0s and 1s. here is an example: (1, 0, 1, 1).
I need to parse through this series of arrays and extract the index of the
0s in the array.

I have a perl -e function in my .bashrc file.
This sources in the perl -e function so I can run it by just the command name.
I'm having trouble with the substitution of my $1 bash variable into
the perl -e function.

This may be beyond the beginner level.... I don't know.
I'd like to prompt the user to type in a City, State, and Zip in one  
line.  It's free-form, in that it's just for display, but I can make a  
pretty decent "suggestion"  based upon data I've previously gathered.

How can I retrieve data loaded into an array within a foreach block?
The array is defined outside the foreach block and is not the indexing
array of the foreach loop.
I have defined three arrays

hello <- I TYPED THIS IN AND HIT RETURN
hello

hi i am trying to write a bot that passes messages to OSC from and IRC
i'm having a bit of problem formating my output
the messages i get in my OSC client look like this:
/irc/11811/$VAR1 = rob;/$VAR1 =  testing 1 2 3

I have been trying to write this email for a day or two but the
content keeps shifting as my understanding of the problem develops.
I have encountered a bit of code that I am struggling to understand
completely. The code is for dealing with database fields that are

Hi again,
I'm trying to factor out the declaration and setting of a bunch of  
variables that a suite of programs will need, as well as defining some  
subroutines that will be needed.  I've been mainly referencing  

I have not had a lot of experience with writing functions in perl. However I am working on a pretty good size script that could reduce the code size by writing a function that would pass in 2  arrays, a file handle and a string. The function only uses the strings for outputting ...

How to  achieve a parser with Perl?
I mean I want to put some logic (if...else, loop etc) in config file and let perl to parse them, like TCL for iRules.
thanks.

I need a quick regex to strip out the following:
example:
change "remove-all-this (Keep This)" into just "Keep This"
something like:

I've been tutoring someone in Perl 5, and as she wants to learn Perl from a
paperware book, she borrowed the book "Sams Teach Yourself Perl in 21 Days"
from her workplace's library, and started reading it. Now, all those "in 21
Days"/"in 24 hours"/"unleashed"/"for Dummies"/etc. ...

I am trying to search for a pattern in a file in my perl script.
Syntax used is :
system("grep \"$res\" ${data_dir}/${node}.load >
/tmp/${day[0]}.${day[1]}.${day[2]}.${node}.log");