Re: delete by id ?

[prev] [thread] [next] [Date index for 2005/02/09]

Errors Output

   1. Can't use string ("15") as a HASH ref while "strict refs" in use at /usr/lib/perl5/site_perl/5.8.2/Class/DBI.pm line 1091. , /usr/lib/perl5/site_perl/5.8.6/Apache/ASP.pm line 1518 

Debug Output

   1. Can't use string ("15") as a HASH ref while "strict refs" in use at /usr/lib/perl5/site_perl/5.8.2/Class/DBI.pm line 1091. , /usr/lib/perl5/site_perl/5.8.6/Apache/ASP.pm line 1518 

ASP to Perl Script 

  -: use strict;;;use vars qw($Application $Session $Response $Server $Request);;
  -: #line 1 /path/to/do_del.asp
  1: ;;
  2:     my $id = $Request->Params('id');
  3:     unless ($id) {
  4: 	$error = "No ID specified"; $Response->End()
  5:     }
  6: 
  7: #    my $obj = $class->retrieve($id);
  8: #    $obj->delete();
  9:     no strict 'refs';
 10:     $class->delete($id);
 11: ; 



On Tue, 8 Feb 2005 22:01:03 +0000
Tony Bowden <tony-cdbitalk@xxxxx.xxx> wrote:

|On Tue, Feb 08, 2005 at 10:59:01PM +0200, raptor wrote:
|> Can I do ,
|> $Class->delete($id);
|> instead of :
|> my $obj = $Class->retrieve($id)
|> $obj->delete();
|
|What happened when you tried?
|
|Tony
|
|