#!/usr/bin/perl
use warnings;
use strict;
use Data::Dumper;
use XML::Twig;
my @xhash=();
my $xhash=\@xhash;
my $file= $ARGV[0];
$xhash = XML::Twig->new();
$xhash -> parsefile('$file');
$xhash -> print;
##</code><code>##

ERROR:
Microsoft Windows XP [Version 5.1.2600]
(C) Copyright 1985-2001 Microsoft Corp.

C:\Documents and Settings\BISADMIN>e:

E:\>cd fh\demo

E:\FH\Demo>cd 1-9demo

E:\FH\Demo\1-9demo>perl hashreplace.pl Ch01.xml
Couldn't open $file:
No such file or directory at hashreplace.pl line 10
 at hashreplace.pl line 10

E:\FH\Demo\1-9demo>_END_