sub waitForCmd {
    my $href        = shift(@_);

    # wait for the file
    #
    sleep 1    while ( ! -e "$href->{settings}->{runfolder}/$href->{se
+ttings}->{logfile}" );

    open( FH ,'<', "$href->{settings}->{runfolder}/$href->{settings}->
+{logfile}" );

    # keep track of spinner
    #
    my @sails = map { "\b$_" } qw{- \ | /};
    my $sail = 0;

    # now search each line for job completed
    #
    FILE:
    for (;;) {
        while (<FH>) { 

            print $sails[$sail++ % @sails] ;            

            last FILE, if ( $_ =~ /Stopping AppMonitor Connector/ );
        }
        seek(FH, 0, 1);
    }

close (FH);
return;
}
[download]