chiark
/
gitweb
/
~ianmdlvl
/
dgit.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
dgit: Introduce "deliberatelies"
[dgit.git]
/
Debian
/
Dgit.pm
1
#
2
3
package Debian::Dgit;
4
5
use strict;
6
use warnings;
7
8
BEGIN {
9
use Exporter ();
10
our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
11
12
$VERSION = 1.00;
13
@ISA = qw(Exporter);
14
@EXPORT = qw(debiantag);
15
%EXPORT_TAGS = ( ); # eg: TAG => [ qw!name1 name2! ],
16
@EXPORT_OK = qw();
17
}
18
19
our @EXPORT_OK;
20
21
sub debiantag ($) {
22
my ($v) = @_;
23
$v =~ y/~:/_%/;
24
return "debian/$v";
25
}
26
27
1;