#!/usr/bin/perl

open FH,"data.txt" or die " can't open file $!\n";
while ( <FH> ) { print $_; }

##</code><code>##

 
command prompt>pp -a "data.txt" -o example.exe example.pl