 |
| User since: |
Dec 05, 2000 at 01:54 UTC
(22 years ago) |
| Last here: |
Jan 05, 2006 at 22:23 UTC
(17 years ago) |
| Experience: |
568
|
| Level: | Monk (7) |
| Writeups: |
58
|
| Location: | Champaign-Urbana Perl Mongers |
| User's localtime: |
Mar 22, 2023 at 10:01 -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";
}
|
