t/t0200/test.perl

   1 # This is a phony Perl program that's only here to test xgettext
   2 # message extraction
   3
   4 # so the above comment won't be folded into the next one by xgettext
   5 1;
   6
   7 # TRANSLATORS: This is a test. You don't need to translate it.
   8 print __("TEST: A Perl test string");
   9
  10 # TRANSLATORS: This is a test. You don't need to translate it.
  11 printf __("TEST: A Perl test variable %s"), "moo";
  12
  13 # TRANSLATORS: If you see this, Git has a bug
  14 print _"TEST: A Perl string xgettext will not get";