Help for this page

Select Code to Download


  1. or download this
    while( <DATA> ) {
      chomp;
      print "( $_ ) = ( ", eval($_), " )\n";
    }
    
  2. or download this
    use Math::Expression::Evaluator;
    
    ...
    1 + 2
    2 * 2 + 4
    asdf#@fg
    
  3. or download this
    ( 1+2 ) = ( 3 )
    ( 1 + 2 ) = ( 3 )
    ( 2 * 2 + 4 ) = ( 8 )
    Unable to resolve expression (asdf#@fg).