my $text = `cat $file`;