Fixing gender losing of offered pokemon requires database deletion;

This commit is contained in:
Sergiotarxz 2024-05-07 00:42:18 +02:00
parent 494e89efa1
commit 611e61c1e9

View File

@ -4,7 +4,6 @@ use v5.34.1;
use strict;
use warnings;
use utf8;
use Mojo::Base 'Mojolicious', -signatures;
use Mojo::JSON;
@ -143,11 +142,10 @@ EOF
my $level_container =
$offer->at('.pfFormValue.colPortrait li.portrait')->next;
# my $level_string = decode( 'utf-8', $level_container->text );
my $level_string = $level_container->text;
my $level_string = decode( 'utf-8', $level_container->text );
my ($level) = $level_string =~ /(\d+)/;
my ($gender) = $level_string =~ /(♂|♀)/;
my ($gender) = $level_string =~ /(♂|♀)/um;
my $has_pokerus = $offer->at('span.pkrs');
$has_pokerus = !!$has_pokerus;
my $date;