pkg_add/OpenBSD/LibSpec.pm

32 		return $self->{stem};
55 sub stem($self)  subroutine
57 	return $self->{stem};
130 	push @{$repo->{$lib->stem}}, $lib;
133 sub find_best($repo, $stem)
137 	if (exists $repo->{$stem}) {
138 		for my $lib (@{$repo->{$stem}}) {
157 	if (my ($dir, $stem, $major, $minor) = $filename =~ m/^(.*)\/lib([^\/]+)\.so\.(\d+)\.(\d+)$/o) {
158 		bless { dir => $dir, stem => $stem, major => $major,
211 sub new($class, $dir, $stem, $major, $minor)
214 		dir => $dir, stem => $stem,
226 sub new_with_stem($class, $stem, $major, $minor)
228 	if ($stem =~ m/^(.*)\/([^\/]+)$/o) {
231 		return $class->new(undef, $stem, $major, $minor);
237 	if (my ($stem, $major, $minor) = $string =~ m/^(.*)\.(\d+)\.(\d+)$/o) {
238 		return $class->new_with_stem($stem, $major, $minor);
252 	my $result = $repo->{$spec->stem};