#!/usr/bin/perl use warnings; use strict; local ($bak_id)=shift; local ($acc_bal)=shift; $bak_id=; $acc_bal=; chomp ($bak_id); print "Returning to MM\n", exit 0 unless $bak_id; . . .