#!/usr/bin/perl use strict; print ":Hello ^M world:\n"; #### World: #### Hello world