#!/usr/bin/perl$input=<>;if ($input >= 5 ) { print "The input number is equal to or greater than 5 \n";} else { print "The input number is less than 5 \n";}