Changeset 1835 in MondoRescue

Timestamp:

Dec 5, 2007, 1:02:30 AM (17 years ago)

Author:

Bruno Cornec

Message:

Escape variables in a perl script like mindi-bkphw

File:

• branches/2.2.5/mindi/mindi-bkphw (modified) (1 diff)

branches/2.2.5/mindi/mindi-bkphw

@@ -33 +33 @@
     open(TOOLS,"> $bkpdir/../tools.files") || die "Unable to open $bkpdir/../tools.files";
     open(SCRIPT,"> $bkpdir/../mindi-rsthw") || die "Unable to open $bkpdir/../mindi-rsthw";
-    print SCRIPT  << "EOF";
+    print SCRIPT  << 'EOF';
 #!/bin/bash
 #