$VAR1 = bless( {
'bandwidth' => bless( {
'out' => 34,
'in' => 10
}, 'Customer::Network::Bandwidth' ),
'customer' => bless( {
'status' => 0,
'name' => "\x{422}\x{435}\x{441}\x{442}",
'cid' => 5
}, 'Customer' ),
'prefix' => '192.168.0.1/30'
}, 'Customer::Network' );
Лучше использовать Storable::nfreeze($VAR1).
Спасибо, Александру Лурье (Moscow.pm).
Комментариев нет:
Отправить комментарий