I am trying to experiment a simple perl math caculation script I wrote:
#!/usr/bin/perl
use strict;
use warnings;
my %operator = (
minus => '-',
add => '+',
multiply => '*',
divide => '/',
);
my $big = 5;
my $small = 2;
for (values %operator) {
my $result = $big $_ $small;
print "$result\n";
}
I know the "my $result = $big $_ $small" is not valid perl expression,and
may look stupid :) but you get the idea that I want to achieve that
because the operator is stored in a varible and unknown to me. I guess
there is other way around, I am just not aware of.
Thanks in advance
Vincent
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/