/^(\d+)/; print $1; #### s/^(\d+).*/\1/; print;