#!/usr/local/bin/perl -w

use strict;

{
   my $v=2;
   print "Adding $v + $v = ", `echo $v $v + p | dc`;
}