From 16db2fd0aa6553ee1f659c0f38320017dffb1dc5 Mon Sep 17 00:00:00 2001 From: txtsd Date: Sun, 6 Jun 2021 21:25:46 +0530 Subject: [PATCH] Remove leading 'the' in class --- idlebot.pl | 1 + 1 file changed, 1 insertion(+) diff --git a/idlebot.pl b/idlebot.pl index 9cbcea1..c632f6f 100755 --- a/idlebot.pl +++ b/idlebot.pl @@ -150,6 +150,7 @@ if (! -e $opts{dbfile}) { $uname = length($uname)?$uname:$opts{owner}; print "Enter a character class for this account: "; chomp(my $uclass = ); + $uclass =~ s/^the //i; $rps{$uname}{class} = substr($uclass,0,30); print "Enter a password for this account: "; if ($^O ne "MSWin32") {