$ perl -e'print +(stat)[4],$/ for @ARGV' sources

or 

$ stat -c "%u" sources