IB
Size: a a a
IB
AP
AP
AP
IB
AP
AP
AP
AP
АК
YT
YT
АК
YT
(keys @$struct) = split(/;/, $str)?
YT
IB
SK
YT
AP
AP
my $struct = {...
в том, что сохранённый порядок ключей может не совпадать тем, которым ты инициализировал. вернее, совпадать он может чисто случайно, и, как правило, не.