in reply to (z) SUPER and Class::DBI

You want to read the "DATA NORMALIZATION" and "DATA VALIDATION" sections of the Class::DBI manual.

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.

Replies are listed 'Best First'.
(z) Re^2: SUPER and Class::DBI
by zigdon (Deacon) on Dec 31, 2003 at 13:52 UTC
    That is exactly it! Thanks! For reference, here's what I did, and now everything works as a charm: 
    sub normalize_column_values {
  my $self = shift;
  my $hashref = shift;

  if (exists $hashref->{password}) {
    $hashref->{password} = Digest::MD5::md5_base64($hashref->{password
+});
  }
}

    [download]
    Thanks!

    -- zigdon

[reply]
[d/l]

In Section Seekers of Perl Wisdom