#!/usr/bin/perl use warnings; use strict; use lib "./"; use MNU; my $game_str; $game_str = ""; while(($game_str = MNU->loop($game_str)) ne "QUIT"){ printf("blah\n"); }