#!/usr/bin/perl
# nlexample.plx
# The script opens a text file, reads it, prints a number and
# then each line within the file.
use warnings;
use strict;
use diagnostics;

open FILE, 'C:\Perl\Perl practice\test.txt' or die $!;
my $lineno = 1;

while(<FILE>)
{
   print $lineno++;
   print ": $_";
}

##</code><code>##

Uncaught exception from user code:
No such file or directory at C:\DOCUMENTS AND SETTINGS\RICHARD LAMB \LOCAL SETTINGS\Temp\dir11.tmp\nlexample.plx line 8