Remove unicode characters, because, apparently, this is still hard for Windows

This commit is contained in:
Justin Hawkins 2017-02-16 15:40:47 +10:30
parent 0fcb5a2550
commit 9d4c75b401

7
dau
View File

@ -2,7 +2,6 @@
use strict; use strict;
use warnings; use warnings;
use utf8;
use feature 'say'; use feature 'say';
@ -10,8 +9,6 @@ use Mojo::UserAgent;
use Getopt::Long qw/GetOptions/; use Getopt::Long qw/GetOptions/;
use Data::Dumper qw/Dumper/; use Data::Dumper qw/Dumper/;
binmode(STDOUT, ":utf8"); # it's 2017, right?
my $webhook_url; my $webhook_url;
my $directory = "./"; my $directory = "./";
my $username; my $username;
@ -75,7 +72,7 @@ sub qualifies {
} }
sub info { sub info {
say " " . shift; say "- " . shift;
} }
sub debug { sub debug {
@ -84,7 +81,7 @@ sub debug {
} }
sub error { sub error {
say " " . shift; say "* " . shift;
} }
sub upload { sub upload {