kalkulator sederhana dengan perl

#!/usr/bin/perl
use strict;
$|++;
print ">";
print eval, "\n" while chomp($_=);

hasil keluarannya adalah :