Replace perl code with pure shell code