my $bigseqnum = do {
    no warnings;
    int($seqnum) + 10000000
};