#!/usr/bin/perl -wl
print eval"@ARGV[0,2,1]"