Flyway: Невозможно вставить значение NULL в значение 'instal_on', столбец таблицы 'schema_version' не допускает пустых значений Вставить не удается

Вот некоторый код Perl, который я просто быстро взломал.

my($sign,$coeffl,$coeffr,$exp) = $str =~ /^\s*([-+])?(\d+)(\.\d*)?e([-+]?\d+)\s*$/;

my $shift = length $coeffl;
$shift = 0 if $shift == 1;

my $coeff =
  substr( $coeffl, 0, 1 );

if( $shift || $coeffr ){
  $coeff .=
    '.'.
    substr( $coeffl, 1 );
}

$coeff .= substr( $coeffr, 1 ) if $coeffr;

$coeff = $sign . $coeff if $sign;

$exp += $shift;

say "coeff: $coeff exponent: $exp";
0
задан ASCIIbetical 18 January 2019 в 15:20
поделиться