http://www.perlmonks.org?node_id=471027


in reply to regexp: match anything but "/"

the following statement can help u....

if (m#[^\/]#)
{
  # do something..
}

* Frank *