my ($user, undef, $project) = split /\|/;