Mercurial > hg > lukkari

comparison parsedata.pl @ 168:8b2107f0d50b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Remove dead function.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 24 Aug 2015 10:51:52 +0300
parents 1d17dbb864ff
children 04c4f1a95dbd
comparison
equal deleted inserted replaced
167:074a4a00af08 168:8b2107f0d50b
23 my $hourFillTable = {}; 23 my $hourFillTable = {};
24 my $maxDays = 0; 24 my $maxDays = 0;
25 my $firstHour = 0; 25 my $firstHour = 0;
26 my $lastHour = 0; 26 my $lastHour = 0;
27 my $totalHours = 0; 27 my $totalHours = 0;
28
29
30 sub urlencode($)
31 {
32 my $value = $_[0];
33 $value =~ s/([^a-zA-Z_0-9 ])/"%" . uc(sprintf "%lx" , unpack("C", $1))/eg;
34 $value =~ tr/ /+/;
35 return $value;
36 }
37 28
38 29
39 sub str_trim($) 30 sub str_trim($)
40 { 31 {
41 my $str = $_[0]; 32 my $str = $_[0];