view _test/temp.pl @ 392:54b1dc9e808a

fixed web-resources access check
author sergey
date Fri, 14 Feb 2014 03:31:45 +0400
parents ced5937ff21a
children 212cc86e470b
line wrap: on
line source

#!/usr/bin/perl
use strict;
use Scalar::Util qw(looks_like_number);
print looks_like_number(0);