Reading file from TPL

r_pal007

please find below the code I have written to read a text file from a TPL it is showing error "not well-formed (invalid token) " at (my $allButtons = <$file_handle> )

please let me know the correct way of reading a .txt file at the earliest, thanks in advance..







open my $file_handle,'/app/mass1/teamsite/iw-home/iw-perl/bin/text_names.txt'
or die "Scotty can't be slurped:\n$!";
local $/; # Set input to "slurp" mode.
my $allButtons = <$file_handle>;
close(<$file_handle>);

Frederik

please find below the code I have written to read a text file from a TPL it is showing error "not well-formed (invalid token) " at (my $allButtons = <$file_handle> ) please let me know the correct way of reading a .txt file at the earliest, thanks in advance.. [HTML] open my $file_handle,'/app/mass1/teamsite/iw-home/iw-perl/bin/text_names.txt' or die "Scotty can't be slurped:\n$!"; local $/; # Set input to "slurp" mode. my $allButtons = <$file_handle>; close(<$file_handle>); [/HTML]

Your TPL file is in essence an XML file, so it should be XML valid. I believe you should use at the very least [HTML] ...your code... [/HTML] ... to avoid parsing of the child data of iw_perl. If you don't know why, read an XML introduction, e.g. at http://www.w3schools.com/xml/