Mattheus Henrique wrote:
Hi, I'm learning Perl but I've found some difficulties:
Why doesn't this:
[code]
#!/usr/bin/env perl
use warnings;
use strict;
while(<>){
if(/[A-Z][^A-Z]+/){
print;
}
}
[/code]
Act like this:
[code]#!/usr/bin/env perl
use warnings;
use strict;
while(<
Hi, I'm learning Perl but I've found some difficulties:
Why doesn't this:
[code]
#!/usr/bin/env perl
use warnings;
use strict;
while(<>){
if(/[A-Z][^A-Z]+/){
print;
}
}
[/code]
Act like this:
[code]#!/usr/bin/env perl
use warnings;
use strict;
while(<>){
if(/[A-Z][a-z]+/){