html - perl WWW::Mechanize::Firefox を使用して Html ファイルを png に変換する

Question

Perl で WWW::Mechanize::Firefox を使用して、HTML ファイルを png ファイルに変換しようとしています。

私がそれに使用したコード

        use WWW::Mechanize::Firefox;
        use Path::Class qw/file/;

        my $mech = WWW::Mechanize::Firefox->new(
          bufsize => 10_000_000, # PNGs might become huge
        );
        my $count=0;
        while($count<90){
        $count++;
        chomp($count);
        my $k="file:///C:/Users/ACER/Desktop/file/$count.html";
        print"$k\n";
        $mech->get($k);
        my $name="$count.png";
        my $fh = file( $name )->open( '> :raw' );
        print $fh $mech->content_as_png();
        $k='';
        }

html ファイルの名前は、次のように 1.html、2.html となります。そのため、アドレスの変数として $counter を割り当てましたが、while ループの 2 回目の反復で終了します。ここで使用した get() 関数に疑問があります。どなたかご指南ください。ありがとうございました。