perl nano some_random_file