|
1 | 1 | <!-- |
2 | | -$Header: /cvsroot/pgsql/doc/src/sgml/plperl.sgml,v 2.3 2000/03/31 06:17:21 thomas Exp $ |
| 2 | +$Header: /cvsroot/pgsql/doc/src/sgml/plperl.sgml,v 2.4 2000/05/09 18:30:43 momjian Exp $ |
3 | 3 | --> |
4 | 4 |
|
5 | 5 | <chapter id="pl-perl"> |
@@ -101,7 +101,7 @@ SELECT name, totalcomp(basesalary, bonus) from employee |
101 | 101 | <programlisting> |
102 | 102 | CREATE FUNCTION empcomp(employee) returns int4 |
103 | 103 | AS 'my $emp = shift; |
104 | | - return $emp->{'basesalary'} + $emp->{'bonus'};' |
| 104 | + return $emp->{''basesalary''} + $emp->{''bonus''};' |
105 | 105 | LANGUAGE 'plperl'; |
106 | 106 | </programlisting> |
107 | 107 | A tuple is passed as a reference to hash. The keys are the names of |
|