[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

macperl-forum-digest V1 #4




macperl-forum-digest      Saturday, April 3 1999      Volume 01 : Number 004



[MacPerl-Forum] Success with DBD::Oracle?
[MacPerl-Forum] [MacPerl] All Perl Solution
Re: [MacPerl-Forum] [MacPerl] All Perl Solution

----------------------------------------------------------------------

Date: Thu, 01 Apr 1999 16:17:15 -0500
From: Geoffrey C Kinnel <kinnelg@bms.com>
Subject: [MacPerl-Forum] Success with DBD::Oracle?

Hi all,

I recently got CPAN up and running with some minor troubles along the
way (always read the instructions), and I tried pulling down
DBD::Oracle. I got this error during the install process:

Can't do Makefile.PL in {path}:DBD-Oracle-0.60
No {path}:DBD-Oracle-0.60 package data
MM_MacOS.pm line 909

What should I be looking for as the problem here? Has anyone got
DBD::Oracle working?

Also, is there *really* a difference between MacPerl f:lib and MacPerl
f:site_perl? Or is that just different name preferences for the same
thing?

Thanks,
Geoff

p.s. Thanks to Chris for cpan. On my initial attempt it worked, right
through the proxy-server. (Well, initial after actually reading the
installation docs. ;)

==== Want to unsubscribe from this list?
==== Send mail with body "unsubscribe" to macperl-forum-request@macperl.org

------------------------------

Date: Fri, 2 Apr 1999 07:26:49 -0600
From: Greenblatt & Seay <g-s@navix.net>
Subject: [MacPerl-Forum] [MacPerl] All Perl Solution

Kent Tegels, a member of the Omaha Perl Mongers, gave me permission to
forward this clever all Perl Y2K solution to the MacPerl list.

David Seay

- ------------

I was recently asked to make sure all my Perl scripts were updated to Y2K.
Really, I don't see what the problem is, I just run this script and it
seems to fix everything.

# No shebang for windows, duh
@plfiles=glob("*.pl");
foreach $f (@plfiles) {
	open(inf,"<$f")||die($!);
	$o = "y2k.".$f;
	open(outf,">$o")||die($!);
	while(<inf>) {
		s/y/k/g;
		s/Y/K/g;
		print outf;
	}
	close outf;
	close inf;
}
exit;

And all my Y to K problems were solved!

Moral of the code:
You know you're a geek when you write jokes in Perl.

Kent



==== Want to unsubscribe from this list?
==== Send mail with body "unsubscribe" to macperl-forum-request@macperl.org

------------------------------

Date: Fri, 2 Apr 1999 10:34:57 -0500 (EST)
From: rjk@linguist.dartmouth.edu (Ronald J. Kimball)
Subject: Re: [MacPerl-Forum] [MacPerl] All Perl Solution

Greenblatt & Seay wrote:
> 
> Kent Tegels, a member of the Omaha Perl Mongers, gave me permission to
> forward this clever all Perl Y2K solution to the MacPerl list.
> 
> David Seay
> 
> ------------
> 
> I was recently asked to make sure all my Perl scripts were updated to Y2K.
> Really, I don't see what the problem is, I just run this script and it
> seems to fix everything.
> 
> # No shebang for windows, duh
> @plfiles=glob("*.pl");
> foreach $f (@plfiles) {
> 	open(inf,"<$f")||die($!);
> 	$o = "y2k.".$f;
> 	open(outf,">$o")||die($!);
> 	while(<inf>) {
> 		s/y/k/g;
> 		s/Y/K/g;

If you have to solve a lot of Y2K problems, this would be more efficient:

tr/yY/kK/;

> 		print outf;
> 	}
> 	close outf;
> 	close inf;
> }
> exit;
> 
> And all my Y to K problems were solved!
> 
> Moral of the code:
> You know you're a geek when you write jokes in Perl.

No, you know you're a geek when you correct them.  ;)


Ronald

==== Want to unsubscribe from this list?
==== Send mail with body "unsubscribe" to macperl-forum-request@macperl.org

------------------------------

End of macperl-forum-digest V1 #4
*********************************


==== Want to unsubscribe from this list?
==== Send mail with body "unsubscribe" to
==== macperl-forum-digest-request@macperl.org