"Andrey Y. Mosienko" wrote:
>
> Hello All!
>
> I just included PL/Perl language in my database.
> Created function:
>
> CREATE FUNCTION and_with_mask(int2, int2) RETURNS int2 AS
> '
> return $_[0] &
> $_[1]
> ' LANGUAGE 'plperl';
> select and_with_mask(32,1);
> and_with_mask
> ---------------
> 1
> #!/usr/bin/perl
> $val = 32 & 1;
> print("val = $val\n");
>
> val = 0
>
> Where am I mistaken or something is in PL/Perl?
perl -e 'print ("32" & "1"),"\n"'
Values are being passed in as strings so perl is doing bitwise string
operation (perldoc perlop). Convert to numbers by doing +0 or similar.
- Richard Huxton
