Help for this page
my $filename = "filename"; open my $file, '<', $filename; @fileinput=<$file>; ... print $Cword; } }