string specific functions in perl