Benign perl Download

Term-Maze 0.05

“Mazes in the terminal”

Script prints a CLI usage screen

SHA-2565e4995ad7094355a378bc315c8b92af321255cc9b4730b99503cd250b126bd53

URLhttps://cpan.metacpan.org/authors/id/L/LN/LNATION/Term-Maze-0.05.tar.gz

MaleculeH(U)

Evidence

Script prints a CLI usage screen lines 1–37

1package Term::Maze;
2
3use 5.006;
4use strict;
5use warnings;
6use Term::ReadKey ();
7use Getopt::Long ();
8our $VERSION = '0.05';
9
10require XSLoader;
11XSLoader::load('Term::Maze', $VERSION);
12
⋯4 lines
17sub _usage {
18	return <<'USAGE';
19maze - mazes in the terminal
20
21usage: maze [options]
22       maze WIDTH HEIGHT
23
24  --width N      columns, at least 2 (default 40)
25  --height N     rows, at least 2 (default 20)
26  --help         this
27
28exit status:
29  0   you reached the exit, or you quit
30  2   a bad option
31
32Move with WASD or HJKL. Reach the exit to win; q or escape quits.
33USAGE
34}
35
36sub _mode {
37	my ($mode) = @_;

English function-word token "for" lines 60–65

41… ;
$height = $argv[1] if defined $argv[1];
}
for ([width => $width], [height => $height]) {
next if $_->[1] >= 2;
print STDERR "maze: --$_-> …

English function-word token "and" lines 173–175

173:3… xit Term::Maze->run(@ARGV);
174
175Runs the maze game and returns the exit status. Two bare non-negative integers are the width and height, as they alway …

No evidence locations were recorded for this file. Raw result