print "Insert your command:";

$input = <STDIN>;

if ($input =~ /^help\s+(.*)/) {
  # do something
}
elsif ($input =~ /^other command\s+(.*)/) {
  # do something else
}