Skip to content
GitLab
Explore
Sign in
Primary navigation
Search or go to…
Project
F
Fadecandy
Manage
Activity
Members
Code
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Help
Help
Support
GitLab documentation
Compare GitLab plans
Community forum
Contribute to GitLab
Provide feedback
Keyboard shortcuts
?
Snippets
Groups
Projects
Show more breadcrumbs
scanlime
Fadecandy
Commits
dd71f3e6
Commit
dd71f3e6
authored
8 years ago
by
Micah Elizabeth Scott
Committed by
GitHub
8 years ago
Browse files
Options
Downloads
Plain Diff
Merge pull request #87 from Debilski/patch-1
Fix ARGV input.
parents
4e0efb58
be8c7c54
No related branches found
Branches containing commit
No related tags found
No related merge requests found
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
examples/perl/multitomaton.pl
+3
-3
3 additions, 3 deletions
examples/perl/multitomaton.pl
with
3 additions
and
3 deletions
examples/perl/multitomaton.pl
+
3
−
3
View file @
dd71f3e6
...
...
@@ -22,10 +22,10 @@ $client->can_connect();
my
$red_rule
=
$ARGV
[
0
];
$red_rule
=
int
(
rand
(
255
))
unless
$red_rule
;
my
$green_rule
=
$ARGV
[
0
];
my
$green_rule
=
$ARGV
[
1
];
$green_rule
=
int
(
rand
(
255
))
unless
$green_rule
;
my
$blue_rule
=
$ARGV
[
0
];
my
$blue_rule
=
$ARGV
[
2
];
$blue_rule
=
int
(
rand
(
255
))
unless
$blue_rule
;
print
"
Running rules
$red_rule
(red),
$green_rule
(green), and
$blue_rule
(blue)
\n
";
...
...
@@ -117,4 +117,4 @@ while(1){
sleep
1
;
}
print
"
Done
\n
";
\ No newline at end of file
print
"
Done
\n
";
This diff is collapsed.
Click to expand it.
Preview
0%
Loading
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Save comment
Cancel
Please
register
or
sign in
to comment