I believe this is because shift() is diffrent than shift. Calling shift() i believe forces shift to be called with no arguments, rather than with @_ as is done when called without parens.
Reference : Programming Perl, 3rd Edition -- Chapter 6 -- Page 218
from the frivolous to the serious
>I believe this is because shift() is diffrent than shift. Calling shift() i believe forces shift to be called with no arguments, rather than with @_ as is done when called without parens.
If you are right, why does the following work correctly:
sub AnySub {
my @list = @{ shift() }; # automatic dereferencing list
...
In that case, i stand (well, sit actually), corrected. Was worth a shot.
As a side comment, i assume something is assigning a database handle to the $self object, and that $self has a param() method which returns that value. You probably shoud be checking defined($dbh) to make sure the Database connection was successful, and that nothing has gone wrong to this point.
from the frivolous to the serious