// start.efg // // File for selftest: first file to read // // Ralf Peine, 2004-05-26 Tue # comment 1 // comment 2 $var1 = 'SRC\dir\file'; $g1->setVar('var1', $var1); $g1->setVar('var2', "value2"); $g2->setVar('var1', "blabla"); &setVar -all BLUBB Blubber!! my $var1a = "val1a"; &SRC -all 1 dir file &SRC -all 2 $var1a # no subst &SRC -all 3 "$var1a" # no subst &SRC -all 4 HOME\$var1 # no subst &SRC -all 5 HOME\$(var1) &SRC -all 6 'HOME''\$(var1)' &SRC -all 7 "HOME""\\$var1" &SRC g1 8 "HOME\\$(var1)/$(var2)" &SRC g3|g2 9 "HOME\$(var1)" &SRC -all 10 "HOME\\${var1}" &fix_text g1|g3 << EnDe Das ist ein kurzer Test Text. This is a short test text. EnDe &fix_text -all << EnDe next Text EnDe &include inc.efg &include variant_$(VARIANT).efg // &include $(error() // &include $(err // &SRC g1 $(err1 $(bla)/$(err2() // &SRC g2 "\$\(var1" "$(var1)/$(var1()" // &SRC g2 "\$\(var1)" "$(var1)/$(var1)"