sub test {
    my $a, $b, $c, $d;
    my $i;

    $a = 1; $b = 2; $c = 3; $d = 4;

    for ($i = 0; $i < 1e6; $i++) {
        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;

        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;

        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;

        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;

        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;

        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;

        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;

        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;

        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;

        # 100
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
        $a = $a; $a = $b; $a = $c; $a = $d; $b = $a; $b = $b; $b = $c; $b = $d; $c = $a; $c = $b;
    }
}

test();