my @lines = `findgsc ...`; #### @lines = `findgsc ...`; #### @lines = `finedgsc ...`; $prevLines = scalar @lines; @lines = `findgsc ...`; if ( scalar @lines > $prevLines ) { # we got more this time }