overload - #62662 (Allgemeines zu Perl)

esskar

2006-02-07 13:35

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

hi.
wie das mit dem use overload funktioniert, hab ich jetzt verstanden.
Ich kann sowas machen:

Code: (dl )

1
2

my $c1 = $v1 - $x1 + $x2 + $x3 - $x4;
my $c2 = $c1 * $v1;

'x' steht hier für einen Wert, 'v' für eine Variable - und beide sind selbst implementierte objekte.
Wenn ich $c1 und $c2 ausgeben lasse, bekomm' ich (z.B.) folgende Expressions.

Code: (dl )

1
2

a - 10 + 20 + 30 - 40      # $c1
a - 10 + 20 + 30 - 40 * a  # $c2

jetzt würde ich gerne folgendes machen können.

Code: (dl )

my $c3 = ( $x1 + $x2 ) * $v1;

und dafür gerne folgendes bekommen

Code: (dl )

( 10 + 20 ) * a   # $c3

kann ich ( und ) irgendwie overloaded? oder wie bekomm ich das sonst mit ?