Front page | perl.perl5.porters |
Postings from July 2010
On Fri, Jul 02, 2010 at 11:21:08AM -0700, Greg Lindahl wrote:
> I haven't seen any company people comment yet:
>
> * Most of what we want new from "perl" is new/fixed CPAN modules. We
> know how to write them or hire consultants to write them.
>
> * From core perl, what we want most is bug fixing and testing. One
> example: "make utf8 suck less".
Interesting - so principally you're interested in ongoing maintenance, not
new features.
> * We're happy to pay a 'tax' to support general bugfixing if we paid
> for a specific project... and to contribute for bugfixing even if
> we don't have a specific project.
But you don't, because there's no obvious way to contribute to bugfixing,
and no-one creating one?
> Seems to me that the big lack is people to be hired to do the work.
> Are the usual perl consultants not interested? Why? Or, what would it
> take to convince a potential fixer to quit their day job? Do we need
> money in the bank to pay for a year+ of employment?
Good questions. But who *are* the usual perl consultants?
Serious question. I can't answer that. I can demonstrate a non-answer:
If I take everyone who committed over the past 12 months (script at end,
but useful unless you have an account on camel), and analyse by day job
(names normalised camel's recorded full name):
785 Nicholas Clark
Works for an online payment processing company.
Unless the trend of buying things online reverses, job seems secure.
503 Rafael Garcia-Suarez
57 Yves Orton
36 Abigail
1 Philippe Bruhat
Work for booking.com.
Unless people stop using hotels, and booking them online, job seems secure.
447 Jesse Vincent
Runs a company making issue tracking software.
Unless software stops having bugs...
205 Dave Mitchell
I believe actually available for hire: http://iabyn.com/
146 David Golden
138 Chris 'Bingos' Williams
107 H.Merijn Brand
99 Steve Hay
94 Craig A. Berry
51 Leon Brocard
41 Ricardo Signes
18 Chip Salzenberg
13 Joushua Ben Jore, Steve Peters
11 Abhijit Menon-Sen
8 Andy Dougherty
6 Tony Cook
5 Marcus Holland-Moritz
Full time day jobs (I believe)
131 Steffen Mueller
105 Vincent Pit
Academia
49 Jan Dubois
12 Gisle Aas
Full time day jobs working for ActiveState
However, *they* can be hired.
27 Brian D. Foy
I believe still active as consultant and trainer
16 Matt S. Trout
Full time day job working for Shadowcat.
*They* can be hired.
However, other than Dave and ActiveState, I'm unaware of any C or XS patches
originating from the consultants/consultancies named. The vast majority of
core committers have full time jobs already, and aren't fungible guns for hire
available to transfer to working on the core.
I can't speak for anyone else, but I know that I wouldn't want to be paid to
work on the core full time fixing bugs. I like working with a team in an
office on a real product, with more tangible external constraints. I don't
know if David Golden fear that paying some people to work will lead to
volunteers not volunteering to work, but I know that if I'm paid to work on
things, it stops being fun for me to also volunteer on it.
Nicholas Clark
#!/usr/bin/perl -w
use strict;
my $p5p = getgrnam 'p5p';
my %names;
while (my ($gid, $n) = (getpwent)[3,6]) {
$names{$n}++ if $gid == $p5p
}
open my $fh, 'git log --format=full --after=2009/06/30 --before=2010/07/01|';
my ($known, $unknown);
while (<$fh>) {
next unless my ($name) = /^Commit:\s+(.*?)\s*</;
$name =~ s/brian d foy/Brian D. Foy/;
$name =~ s/Chris (?:'Bingos' )?Williams/Chris 'Bingos' Williams/i;
$name =~ s/David Mitchell/Dave Mitchell/;
$name =~ s/Josh ben Jore/Joushua Ben Jore/;
$name =~ s/Matt S Trout/Matt S. Trout/;
$name =~ s/Philippe Bruhat \(BooK\)/Philippe Bruhat/;
++${$names{$name} ? $known : $unknown}{$name};
}
my %invert;
push @{$invert{$known->{$_}}}, $_ foreach keys %$known;
foreach my $count (sort {$b <=> $a} keys %invert) {
print "$count\t", join(', ', sort @{$invert{$count}}), "\n";
}
__END__
print "'$_'\n" foreach sort keys %$unknown;
print "...\n";
print "$_\n" foreach sort keys %$known;
Thread Previous
|
Thread Next