Tag Archive: perl 5.10


Get it here! Perl DBD::Sybase 1.09.01 for Active State Perl 5.10 and 5.8 on Windows XP/Vista/7 32bit

Filed Under: APIs, Databases, DBI, OS, Perl, Sybase, Windows by Jason L Froebe — 8 Comments
March 9, 2010

Assuming that you installed Sybase OpenClient 15.5 from the 15.5 PC Client:

Install ActiveState Perl from http://www.activestate.com (free) and install DBI if it isn’t already installed.  It should be but you never know…

  1. Start -> ActiveState Perl -> Perl Package Manager
  2. install DBI
  3. exit

Now, the easy part.  Install the DBD::Sybase 1.09.01 PPM:

  1. download DBD::Sybase 1.09.01 PPM
  2. extract zip file to temporary directory (e.g. c:\test)
  3. Start -> Run -> cmd.exe (as Administrator if Vista or Windows 7)
  4. cd \test
  5. ppm install DBD-Sybase.ppd
  6. exit

That’s it :)

It should automatically install the DBD::Sybase for Perl 5.8 or 5.10 depending on which version of Active State Perl you have installed.

Tags: , , , , , , , , , , , , , ,
Comment

Are you receiving the “Useless localization of scalar assignment” error when using Exception::Class::TCF with Perl 5.10? I have a fix for you!

Filed Under: Perl by Jason L Froebe — Leave a comment
April 29, 2009

The following is a patch for bug 45563 in Exception::Class::TCF:

Useless localization of scalar assignment at Exception-Class-TCF/lib/Exception/Class/TCF.pm line 255.

Index: lib/Exception/Class/TCF.pm
===================================================================
— lib/Exception/Class/TCF.pm (revision 83)
+++ lib/Exception/Class/TCF.pm (working copy)
@@ -251,8 +251,11 @@
my($block,@catches) = @_;
my($exc,@args,$res);
&$pushFrame;
- $HANDLE_WARN &&
- local ( $SIG{‘__WARN__’} = sub { throw Exception::Class::TCF::Warning @_; } );
+
+ if ($HANDLE_WARN) {
+ local ( $SIG{‘__WARN__’} ) = sub { throw Exception::Class::TCF::Warning @_; };
+ }
+
$dTHROWING = 0;
$res = eval { &$block() };
$exc = $EXCEPTION;

Tags: , , , , , , , , ,
Comment