Maybe you could provide a code examples that actually shows these failures?

BTW perl 5.10 (to be released before christmas) comes with built in switch statement of the form

given ($time) {
    when ("30days"){ 
       ...
    }
    ...
    default {
       # do something else
    }
}
[download]