view _test/temp.pl @ 202:5146e17a7b76

IMPL::Web::Application::RestResource fixes, documentation
author sergey
date Wed, 25 Apr 2012 02:49:23 +0400
parents 2ffe6f661605
children 68a59c3358ff
line wrap: on
line source

#!/usr/bin/perl
use strict;

print join ',', "-some::mod::here" =~ m/^(-)?(\w+(?:::\w+)*)$/;