#!/usr/local/perl5.6.1/bin/perl -w
use strict;
print <>;

__DATA__

Foo bar baz