stringsToTest = list("abc/a3d)-1-B-3-B","dec/d93)-B-1-3",
"vdiek/asdf899)-1-B-B-B-1-3-4","avd/asd/vde)-1-B-3-4",
"ab33/dfv)-B-12-B","abc/ade)-1")
grepl(stringsToTest,
pattern="^[[:alnum:]]+/[[:alnum:]]+\\)(?:-[[:alnum:]]+){3}")
c3RyaW5nc1RvVGVzdCA9IGxpc3QoImFiYy9hM2QpLTEtQi0zLUIiLCJkZWMvZDkzKS1CLTEtMyIsCiAgICAgICAgICAgICAgICAgICAgICJ2ZGllay9hc2RmODk5KS0xLUItQi1CLTEtMy00IiwiYXZkL2FzZC92ZGUpLTEtQi0zLTQiLAogICAgICAgICAgICAgICAgICAgICAiYWIzMy9kZnYpLUItMTItQiIsImFiYy9hZGUpLTEiKQpncmVwbChzdHJpbmdzVG9UZXN0LCAKICAgICBwYXR0ZXJuPSJeW1s6YWxudW06XV0rL1tbOmFsbnVtOl1dK1xcKSg/Oi1bWzphbG51bTpdXSspezN9Iik=