my $sequence_number = "00001";
use_seq_no($sequence_number);

while (...)
{
    if (++$sequence_number eq "99999")
    {
        $sequence_number = "00001";
    }

    use_seq_no($sequence_number);
}

sub use_seq_no
{
    ...
}