#!/usr/bin/perl -w
use strict;

my $math = join ' ', @ARGV;
print `echo 'scale=2; $math' | bc -q`;