scaling.pl: minor change to perl quoting
Makes emacs syntax hilighting work better. Signed-off-by: Jeff Squyres <jsquyres@cisco.com>
Этот коммит содержится в:
родитель
d5a428b646
Коммит
1187212f5d
@ -54,8 +54,7 @@ GetOptions(
|
|||||||
) or die "unable to parse options, stopped";
|
) or die "unable to parse options, stopped";
|
||||||
|
|
||||||
if ($HELP) {
|
if ($HELP) {
|
||||||
print <<EOT;
|
print "$0 [options]
|
||||||
$0 [options]
|
|
||||||
|
|
||||||
--help | -h This help message
|
--help | -h This help message
|
||||||
--quiet | -q Only output critical messages to stdout
|
--quiet | -q Only output critical messages to stdout
|
||||||
@ -69,7 +68,7 @@ $0 [options]
|
|||||||
--all Use all available start commands [default]
|
--all Use all available start commands [default]
|
||||||
--results=file File where results are to stored in comma-separated value format
|
--results=file File where results are to stored in comma-separated value format
|
||||||
--rawout Provide raw timing output to the file
|
--rawout Provide raw timing output to the file
|
||||||
EOT
|
";
|
||||||
exit(0);
|
exit(0);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user