#!/usr/bin/perl -n
BEGIN{$eval="@ARGV";@ARGV=()}
chomp;print(eval($eval),"\n")