in reply to Dynamic operators
use strict; my $n1= 10; my $n2= 20; my $operator= "=="; my $expr = "$n1 $operator $n2"; my $erg = eval $expr; die if ($@); if ($erg) { print "true\n"; } else { print "false\n"; }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: Dynamic operators
by demerphq (Chancellor) on Sep 11, 2002 at 11:41 UTC | |
by kabel (Chaplain) on Sep 11, 2002 at 20:56 UTC |