#!/usr/bin/perl read -p "What is your name: " name print "Hi $name "; read -p "$name, please enter your income tax:" var1 if ($var1 -lt 5000) { print "no tax"; } elsif ($var1 -gt 5000 && $var1 -lt 30000) { print "the tax rate is 10%"; } elsif ($var1 -gt 30000) { print "the tax rate is 20%"; } print "\n";