Return to Answer

added 37 characters in body

edited Oct 14, 2020 at 15:40

Perl 5 `-p`, 6565 61 bytes

@NahuelFouilleul shaved 4 bytes

$_=/^(0[0-7]*|0x\p{Hex}+|[1-9]\d*)(u?l{0,2}?l?|l?l?u?)$/i*!/lL|Ll/*!/u.*u/i

$_=/^(0[0-7]*|0x\p{Hex}+|[1-9]\d*)u?l{0,2}u?$/i*!/lL|Ll/*!/u.*u/i

@NahuelFouilleul shaved 4 bytes

$_=/^(0[0-7]*|0x\p{Hex}+|[1-9]\d*)(u?l?l?|l?l?u?)$/i*!/lL|Ll/

answered Oct 14, 2020 at 5:01

$_=/^(0[0-7]*|0x\p{Hex}+|[1-9]\d*)u?l{0,2}u?$/i*!/lL|Ll/*!/u.*u/i