Select Code to Download

use strict;
use warnings;

Global symbol "$i" requires explicit package name at tkprog.pl line 55
+.

sub makeline {
    my $i;
    my $j;
    ...
}

#!usr/bin/perl -w

...
sub print_seq {
    print "$i";
}