Почему моментальные снимки Windows занимают много времени?

Я запускаю обычную установку Windows на том Amazon EBS. Компьютеру требуется 10 минут для загрузки, что можно понять, поскольку требуется 2 перезагрузки. Однако создание снимка также занимает 10-15 минут. Кто-нибудь может это объяснить? Есть способ ускорить это? Я немного удивлен, потому что я думал, что моментальные снимки являются непосредственными копиями работающего тома EBS, и в таком случае разве они не должны занимать всего пару секунд?

Я добавлю, что консоль показывает этот "моментальный снимок" завершается очень быстро. Но " sub новый {мой ($ class) = @_; мой $ self = {_x => 0, _y => 0,}; return bless $ self = & ...

Я определил объект Point в файле Point.pm следующим образом:

package Point;
sub new {
    my ($class) = @_;
    my $self = {
        _x => 0,
        _y => 0,
    };
    return bless $self => $class;
}

sub X {
    my ($self, $x) = @_;
    $self->{_x} = $x if defined $x;
    return $self->{_x};
}

sub Y {
    my ($self, $y) = @_;
    $self->{_y} = $y if defined $y;
    return $self->{_y};
}

1;

Теперь, когда я использую JSON для преобразования объект в JSON с помощью следующего кода:

use JSON;
use Point;

Point $p = new Point;
$p->X(20);
$p->Y(30);

my $json = encode_json $p;

Я получаю следующую ошибку:

encountered object 'Point=HASH(0x40017288)', but neither allow_blessed nor convert_blessed settings are enabled at test.pl line 28

Как мне преобразовать в JSON и обратно в объект с помощью модуля JSON?