 |
| User since: |
Dec 05, 2000 at 01:54 UTC
(24 years ago) |
| Last here: |
Jan 05, 2006 at 22:23 UTC
(19 years ago) |
| Experience: |
569
|
| Level: | Monk (7) |
| Writeups: |
58
|
| Location: | Champaign-Urbana Perl Mongers |
| User's localtime: |
Dec 04, 2024 at 18:17 -06
|
| Scratchpad: |
View
|
| For this user: | Search nodes |
|
for (0..$#tasks) {
$ryddler[$_] = Ryddler::Clone->new( job => $task[$_] ) || die "Try
+ing";
}
Node's I found interesting enough to mark, but still need time to go back and review
Web Wizard
SQL INSERT creator
Binary to Decimal (zdog's way)
SerialPort module
Should One Use CGI.pm to Generate HTML?
(Corion) Getting active (Re: Perl Programs that can retrieve email addresses from web pages)
Re: (Guildenstern) Re: Uncovering hidden Internet Explorer cache
Learning CGI
Re: Converting a C structure to Perl
notes to self...
#!/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";
}
|
