user
ryddler
<!-- Location:latitude=040.06.34,longitude=-088.16.28-->
<!-- os:Win98,NT,2K,linux -->
<!-- birthday:1964/10/11 -->
<HR>
<!-- begin node -->
<BR><BR>
<code>
for (0..$#tasks) {
$ryddler[$_] = Ryddler::Clone->new( job => $task[$_] ) || die "Trying";
}
</code>
<br>
Node's I found interesting enough to mark, but still need time to go back and review<BR>
<LI><A HREF="/index.pl?node_id=48906&lastnode_id=1072" CLASS="one">Web Wizard</a>
<LI><A HREF="/index.pl?node_id=48489&lastnode_id=1072" CLASS="one">SQL INSERT creator</a>
<LI><A HREF="/index.pl?node_id=30478&lastnode_id=1072" CLASS="one">Binary to Decimal (zdog's way)</a>
<LI><A HREF="/index.pl?node_id=47457&lastnode_id=1072" CLASS="one">SerialPort module</a>
<LI><A HREF="/index.pl?node_id=49149&lastnode_id=1072" CLASS="one">Should One Use CGI.pm to Generate HTML?</a>
<LI><A HREF="/index.pl?node_id=49592&lastnode_id=1072" CLASS="one">(Corion) Getting active (Re: Perl Programs that can retrieve email addresses from web pages)</a>
<LI><A HREF="/index.pl?node_id=49797&lastnode_id=1072" CLASS="one">Re: (Guildenstern) Re: Uncovering hidden Internet Explorer cache</a>
<LI><A HREF="/index.pl?node_id=49893&lastnode_id=1072" CLASS="one">Learning CGI</a>
<LI><A HREF="/index.pl?node_id=50023&lastnode_id=1072" CLASS="one">Re: Converting a C structure to Perl</a>
<hr>
notes to self...<BR>
<CODE>
#!/usr/bin/perl -w
use strict;
package foo;
use vars qw($var);
$var = 'FOO';
print "package foo: $var\n";
package bar;
use vars qw($var);
$var = 'BAR';
print "package bar: $var\n";
package main;
{
no strict 'refs'; # *cough cough*
my $pack = 'foo';
my $var = 'var';
print "(main) package foo: ${$pack . '::' . $var}\n";
$pack = 'bar';
print "(main) package bar: ${$pack . '::' . $var}\n";
}
</CODE>
<hr>
<!-- end node -->
2006-01-05 17:23:49
567
358846
images/userincoming/ryddler.jpeg
58
<A HREF="http://champaign-urbana.pm.org/">Champaign-Urbana Perl Mongers</A>
-6
100