Manampilkan Tahun Kabisat dengan inputan dari keyboard (perl) pada linux

            Buat file dengan perintah

                   ~# touch tahun.pl

Isi file tersebut

          ~# pico tahun.pl

$y = '1';

do

{

        print " masukkan tahun awal : ";

        $a = ;

        print " masukkan tahun batas : ";

        $b = ;

        print "hasil";

        print"\n";

        for ( $c = $a ; $c <= $b ; $c++ )

        {

                if ( $c % 4 == 0)

                {

                        print $c;

                        print "\n";

                }

       }

print "\napakah anda ingin mengulang untuk Ya (1) untuk tidak (0) : ";

$lagi =

}

while ($lagi == "1" );

    Eksekusi program tersebut dengan perintah

            ~# perl tahun.pl