if( $sid =~ m/^([0-9]{1,5})$/ ) {
    $input = $1;
} else {
    # exit
}