Архив ‘1’

23 строки для понимания memory leak в perl

#!/usr/bin/perl -w use strict; use Term::ANSIColor; if (defined ($ARGV[0]) && $ARGV[0]!~/[0-9]+/){     print color 'reset';