perl 에서 자릿수맞춰서 long형? 출력하기

sprintf("%010d", $data);

이런식으로 출력했더니 10자리부터는 -가 붙으면서 값이 잘못나오더군요.
3869616715 이값이 -> -425350581 이렇게 출력됩니다.

그래서 sprintf("%010.f", $data); 이런식으로 10자리로 맞춰서 문자를 출력했습니다.
더 좋은방법이 있다면 소개해 주셨으면 합니다.