diff --git a/lf_firemod.pl b/lf_firemod.pl
index a2cb72a2..a0224daf 100755
--- a/lf_firemod.pl
+++ b/lf_firemod.pl
@@ -78,7 +78,8 @@ our @known_tos        = qw(DONT-SET LOWCOST LOWDELAY  RELIABILITY THROUGHPUT);
 # Nothing to configure below here, most likely.
 ########################################################################
 
-our $usage = qq^$0 [ --action {
+our $usage = <<__EndOfUsage__
+$0 [ --action {
      create_cx | create_endp  | create_arm   |
      delete_cx | delete_cxe   | delete_endp  | do_cmd    |
      list_cx   |  list_endp   | list_ports   |
@@ -156,7 +157,7 @@ Example:
    --endp_type lf_tcp --port_name wlan2 --multicon 1
 
  $0 --mgr localhost --action create_cx --cx_name test1 --cx_endps test1a,test1b
-^;
+__EndOfUsage__;
 
 my $i = 0;
 my $cmd;