$user_name = (getpwuid($<))[6];