#!/usr/bin/perl
eval($ARGV[0])