TODO: { local $::TODO = "fails when run as .t - running the two tcl files manually works."; # prolly not portable, patches welcome. my $source_file = <<'EOF'; set a 10 puts $b EOF
my $source_filename = "tmp.tcl"; open (TMP,">$source_filename") or die $!; print TMP $source_file; close(TMP) ;
$tcl = <<"EOTCL"; set b 20 source "$source_filename" puts \$a EOTCL $expected = <<EOF; 20 10 EOF language_output_is("tcl",$tcl,$expected,"simple source"); unlink($source_filename) }
To install Make, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Make
CPAN shell
perl -MCPAN -e shell install Make
For more information on module installation, please visit the detailed CPAN module installation guide.