Returning a value from an update or insert using DBD::Pg

I know in Oracle I do something like this:

my $sth = $self->dbh->prepare(qq{ update users set
valid=0,end_date=sysdate
where id='$self->{id}' returning $end_date
into :1});

Is this possible with DBD::Pg?

--
Barry Hoggard