shell script within Perl script

foreach (@clientNames){
                # $_ represent the next client name;
                # loop through list
                print "\nProcessing client [$_]:\t";
                @args1 = ("ksh","/export/home/user/Check.ksh","201","$_");
                system(@args1) == 0
                        or die "system @args1 failed: $?";
                #$_ =~ s/ //g;
                print "Client [$_] has associated database client\n" if exists $clientDBHash{$_}
                        or print "Client [$_] does NOT have an associated database client\n";

                foreach $i ( 0 .. $#{ $clientDBHash{$_} } ){
                       
                        print "\n\nPlease enter the @envs[$envNum] Sybase common database Username:\t";
                        my $sybaseUser = 'user';
                        chomp $sybaseUser;
                        print "\nPlease enter the @envs[$envNum] Sybase common database Password:\t";
                        my $sybasePW = $config{'user'};
                        chomp $sybasePW;
                        my $username = "-U$sybaseUser";
                        my $password = "-P$sybasePW";
                        my $server =   "-Sclient062";
                        my $verbose =  "-v1";
                        my $script =   "-i$_" . "_fund.sql";
                        print "NAME: [$script]\n";
                        my $dbLoginString = $username . " " . $password . " " . $server . " " . $script;
                        print "\n\tDEBUG (dbLoginString): [$dbLoginString]\n";
                        #my @args = ("isql",$username,$password,$server,$script);
                        @args = ("isql","$username","$password","$server","$script");
}
}

The problem with my code above is at the step where I execute the ksh it doesnt return to the loop after the execution of the ksh shell script. How can I return to the loop after the execution of the ksh script