stat: +help

diff --git a/stat b/stat
index 6e58013..645a809 100755 (executable)
--- a/stat
+++ b/stat
@@ -117,7 +117,10 @@ if (($ARGV[0]||"") eq "-r") {
   shift;
 }
 my $all_sorted=shift @ARGV if ($ARGV[0]||"") eq "-a";
   shift;
 }
 my $all_sorted=shift @ARGV if ($ARGV[0]||"") eq "-a";

-die $0.' [-r <rpmqafile>] [-a] {""|.dt.rpm|.dt5.rpm} {""|.dt.rpm|.dt5.rpm}' if @ARGV!=2;
+die ""
+  .$0.' [-r <rpmqafile>] [-a] {""|.dt.rpm|.dt5.rpm} {""|.dt.rpm|.dt5.rpm}'."\n"
+  .$0.' "" .dt.rpm;'.$0.' .dt.rpm .dt5.rpm;'.$0.' "" .dt5.rpm'."\n"
+  if @ARGV!=2;

 ($exta,$extb)=@ARGV;
 #my $allpkgs=readfile "dnf -C --disablerepo='*' --enablerepo=rawhide-source repoquery -a --arch src 2>/dev/null|";
 my $allpkgs=readfile "all";
 ($exta,$extb)=@ARGV;
 #my $allpkgs=readfile "dnf -C --disablerepo='*' --enablerepo=rawhide-source repoquery -a --arch src 2>/dev/null|";
 my $allpkgs=readfile "all";