[Vienna-pm] pseudo-bitmask to ints

[Roland Giersig]

Hach, das ist doch ein Einzeiler... *prahlerischtu*

perl -wle 'print join("\n", glob("0{0,1}{0,1}0"))'

Der Einbau des s/\?/\{0,1\}/g wird als Übungsaufgabe dem interessierten 
Leser überlassen... ;-)))

LG, Roland

Thomas Klausner wrote:
> Hi!
> 
> Weil im IRC grad alle schmaestad sind:
> 
> Fuer folgendes Problem such ich eine kleine, praktische Loesung:
> 
> Gegeben ist ein String in der Form '00?1' der eine Bitmask darstellt
> 
> Ich brauche alle Ints, die dieser Batmask-Pseudo-Regex matchen, also in 
> diesem Fall 1 und 3
> 
> bzw, ich haatte gerne eine Funktion:
>    
>    pseudobitmask2ints('00?1');   # (1,3)
>    pseudobitmask2ints('1??1');   # (9,11,15,16)
>    pseudobitmask2ints('0100');   # (4)
> 
> Mir reichen 4 bits.
> 
> Weiss da jemand was parktischen?
>