Don't use a string there - it changes the meaning of 0755:

H:\cvs>perl -e "  print 0 + '0755', ' ', 0755  "
755 493
[download]