removing perl code.
removing perl code.