1 2 3 4
use strict; use warnings; use 5.010; ...
Perl On Restructuring Perl Sitemap ...
by draegtun,
March 15, 2010 10:34
Have a look at the Perl5 wi...
1
C:\Documents and Settings\Santa\Mis documentos\Smtp>perl scan.pl
1 2 3 4
sub parse_decimal { my $input = shift; my $output = parse_grouping($input, ",", "."); # parse as 12,345,678.90 ...
Perl On Handling both dots and comm...
by Neil Ostrove,
January 25, 2010 16:35
Natuarally I messed up the ...
1 2 3 4
use strict; use warnings; use Test::More; ...
Perl On Handling both dots and comm...
by Neil Ostrove,
January 25, 2010 16:28
This gets rid the duplicate...
1 2 3 4
my $end = do { my $month_ago = DateTime->now->subtract( months => 1 ); sprintf '%02d%02d', substr( $month_ago->year, -2 ), $month_ago->month; ...
1
File.open('/usr/local/teste/xml-cvs/ssp.xml').readlines.join.to_s.scan(/\>(.*)\</).uniq.sort.each {|dados| puts "#{dados};#{ File.open('/usr/local/teste/xml-cvs/ssp.xml').readlines.join.to_s.scan(/\>(.*)\</).count(dados)}"}
Perl On Perl one-liner to extract x...
by Antonio Pires de Castro Júnior,
December 29, 2009 17:58
Uma única linha em RUBY par...
Perl On Processing files by date.
by trirnoth,
December 04, 2009 16:41
I have no idea why I didn't...
1
@a{<>}.=print keys%a
1
@a{<>}.=print keys%a
1
perl -we '@a{<>} = 1; print keys %a'
1 2 3 4
sub parse_decimal { (my $input = shift) =~ s/[^\d,\.]//g; my %o = (','=>'.','.'=>','); ...
Perl On Handling both dots and comm...
by giftnuss,
November 17, 2009 10:00
This is a useable implement...
Perl On Handling both dots and comm...
by Thomas Salvador,
November 16, 2009 20:20
hi.
here an idea on how to...
1 2 3 4
#!/usr/bin/perl use strict; ...
Perl On Handling both dots and comm...
by johntrammell.myopenid.com,
November 16, 2009 17:32
Definitely need to get rid ...
1 2 3 4
use File::Path qw(remove_tree); sub purge_archive{ ...
Perl On Delete files from a directory
by Joe McMahon,
November 16, 2009 02:11
As suggested by 'perldoc -f...
1 2 3
sub parse_decimal { ...
Perl On Handling both dots and comm...
by draegtun,
October 09, 2009 21:13
And here are some other exa...
1 2 3 4
use strict; use warnings; use Test::More; ...
Perl On Handling both dots and comm...
by draegtun,
October 09, 2009 21:08
I'm not going to refactor y...
1 2 3 4
# Case 1: {comma,period} followed by exactly 3 digits and no occurrence of 4+ digits in a row # Case 2: {comma,period} followed by exactly N digits where N != 3 # Case 3: No commas or periods ...
Perl On Handling both dots and comm...
by Ben Marini,
October 03, 2009 02:56
Seems like all of these tes...
hi what compilator do you u...