From houston at mail.pm.org  Thu Dec  4 14:13:03 2003
From: houston at mail.pm.org (houston@mail.pm.org)
Date: Mon Aug  2 21:30:43 2004
Subject: [HoustonTx.pm] TIMTOWTDI
Message-ID: <20031204201303.24965.qmail@web21207.mail.yahoo.com>

use strict;

my @Array1 = qw(TIMTOWTDI There is more than one way to do it);
print "$_\n" foreach(@Array1);
foreach(@Array1){ print ("$_\n"); }
foreach my $this (@Array1){ print ("$this\n"); }
for(@Array1){ print ("$_\n"); }
for my $this (@Array1){ print ("$this\n"); }
map { print "$_\n" }@Array1;
print map { "$_\n" }@Array1;



=====
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GIT d s+:++ a C++ UL++ US+ P+++ L++ 
W+++ w PS PE t++ b+ G e r+++ z++++
------END GEEK CODE BLOCK------

__________________________________
Do you Yahoo!?
Free Pop-Up Blocker - Get it now
http://companion.yahoo.com/

From houston at mail.pm.org  Thu Dec  4 14:15:18 2003
From: houston at mail.pm.org (houston@mail.pm.org)
Date: Mon Aug  2 21:30:43 2004
Subject: [HoustonTx.pm] TIMTOWTDI
References: <20031204201303.24965.qmail@web21207.mail.yahoo.com>
Message-ID: <030601c3baa3$56ff8dd0$1901a8c0@eurynome>

Two more for the list:

print join("\n",@Array1);
$, = "\n" and print @Array1;

!c

===================================
Discreet Packaging: www.dronecolony.com
C. Church
===================================


From houston at mail.pm.org  Thu Dec 11 14:32:49 2003
From: houston at mail.pm.org (houston@mail.pm.org)
Date: Mon Aug  2 21:30:43 2004
Subject: [HoustonTx.pm] Subscription request
Message-ID: <3FD8D471.9080805@uh.edu>


-- 
Viren Konde, Ph.D.
Postdoctoral Research Associate
Department of Biology and Biochemistry
University of Houston,
369 Science and Research Building II
Houston, TX 77204-5001
Phone: 713-743-8375, Fax: 713-743-8351