#!/usr/bin/perl -p $_ = eval() . "\n";