mirror of
https://github.com/NaomiAmethyst/dots.git
synced 2025-04-13 09:30:06 +00:00
colortest.pl: removed strict, warnings, integer for compatibility with older perls
This commit is contained in:
parent
48fbe30aeb
commit
f525cb48b3
1 changed files with 0 additions and 4 deletions
|
@ -1,8 +1,5 @@
|
||||||
#! /usr/bin/env perl
|
#! /usr/bin/env perl
|
||||||
|
|
||||||
use strict;
|
|
||||||
use warnings;
|
|
||||||
|
|
||||||
# Generate the array
|
# Generate the array
|
||||||
|
|
||||||
# Fill in the first 16 colors. The exact hex codes vary by terminal and device
|
# Fill in the first 16 colors. The exact hex codes vary by terminal and device
|
||||||
|
@ -35,7 +32,6 @@ print "\n";
|
||||||
|
|
||||||
|
|
||||||
sub number_to_color {
|
sub number_to_color {
|
||||||
use integer;
|
|
||||||
my $num = shift;
|
my $num = shift;
|
||||||
$num -= 16;
|
$num -= 16;
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue