view release on metacpan or search on metacpan
inc/Devel/CheckLib.pm view on Meta::CPAN
@$ld,
(map { "-I$_" } @incpaths),
"-o$exefile",
$cfile
);
} else { # Unix-ish: gcc, Sun, AIX (gcc, cc), ...
@sys_cmd = (
@$cc,
@$ld,
$cfile,
(map { "-I$_" } @incpaths),
inc/Devel/CheckLib.pm view on Meta::CPAN
"-o$exefile",
(map { "-I$_" } @incpaths),
(map { "-L$_" } @libpaths),
"-l$lib",
$cfile);
} else { # Unix-ish
# gcc, Sun, AIX (gcc, cc)
@sys_cmd = (
@$cc,
@$ld,
$cfile,
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ACME/QuoteDB.pm view on Meta::CPAN
none known of
=head1 SEE ALSO
man fortune (unix/linux)
L<Fortune>
L<fortune>
lib/ACME/QuoteDB.pm view on Meta::CPAN
=over 4
=item fortune
unix application in 'games' (FreeBSD) type 'man fortune' from the command line
=item copyright infringement
L<http://www.avvo.com/legal-answers/is-it-copyright-trademark-infringement-to-operate--72508.html>
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Module/Install/Can.pm view on Meta::CPAN
*ExtUtils::MM_Cygwin::maybe_command = sub {
my ($self, $file) = @_;
if ($file =~ m{^/cygdrive/}i and ExtUtils::MM_Win32->can('maybe_command')) {
ExtUtils::MM_Win32->maybe_command($file);
} else {
ExtUtils::MM_Unix->maybe_command($file);
}
}
}
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AFS/Command/FS.pm view on Meta::CPAN
/convert owner mode bits/ && do {
$result->_setAttribute( convert => 1 );
};
/strict unix/ && do {
$result->_setAttribute( convert => 0 );
};
/strict \'?passwd sync\'?/ && do {
$result->_setAttribute( uidcheck => 1 );
view all matches for this distribution
view release on metacpan or search on metacpan
examples/v2/ktct/tokens view on Meta::CPAN
my $index = 0;
while (my $service = AFS::KTC_PRINCIPAL->ListTokens($index)) {
if(my ($token, my $client) = AFS::KTC_TOKEN->GetToken($service)) {
my $user = $client->name;
$user .= "." . $client->instance if ($client->instance);
if ($user eq '' || $user =~ /Unix UID/) { printf("Tokens"); }
elsif ($user =~ /AFS ID/) { printf("User's (%s) tokens",$user); }
print " for ", $service->principal," ";
if ($token->endTime <= time) { print "[>> Expired <<]\n"; }
else {
chomp(my $expire = substr(ctime($token->endTime),4,13));
view all matches for this distribution
view release on metacpan or search on metacpan
_Inline/build/AI/ANN/Neuron_6185/Makefile view on Meta::CPAN
PM_TO_BLIB =
# --- MakeMaker platform_constants section:
MM_Unix_VERSION = 6.55_02
PERL_MALLOC_DEF = -DPERL_EXTMALLOC_DEF -Dmalloc=Perl_malloc -Dfree=Perl_mfree -Drealloc=Perl_realloc -Dcalloc=Perl_calloc
# --- MakeMaker tool_autosplit section:
# Usage: $(AUTOSPLITFILE) FileToSplit AutoDirToSplitInto
_Inline/build/AI/ANN/Neuron_6185/Makefile view on Meta::CPAN
$(PERL_INC)/regexp.h \
$(PERL_INC)/regnodes.h \
$(PERL_INC)/scope.h \
$(PERL_INC)/sv.h \
$(PERL_INC)/thread.h \
$(PERL_INC)/unixish.h \
$(PERL_INC)/util.h
$(OBJECT) : $(PERL_HDRS)
Neuron_6185.c : $(XSUBPPDEPS)
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Module/Install/Can.pm view on Meta::CPAN
*ExtUtils::MM_Cygwin::maybe_command = sub {
my ($self, $file) = @_;
if ($file =~ m{^/cygdrive/}i and ExtUtils::MM_Win32->can('maybe_command')) {
ExtUtils::MM_Win32->maybe_command($file);
} else {
ExtUtils::MM_Unix->maybe_command($file);
}
}
}
}
view all matches for this distribution
view release on metacpan or search on metacpan
genaccessors view on Meta::CPAN
or die "wrong package name $package";
push @ixs, 'value' unless grep /^value$/, @ixs;
my @ixs1 = grep !/^value$/, @ixs;
my $nixs = @ixs;
my $types = join("\n ", "$struct self;", map "unsigned int $_;", @ixs1);
my $args = join(', ', 'self', @ixs1);
my $setargs = join(', ', 'self', @ixs);
genaccessors view on Meta::CPAN
$type
accessor_$method($args, value = NO_INIT)
$types
$type value
CODE:
if (items > $nixs) {
$setter;
}
RETVAL = $getter;
OUTPUT:
RETVAL
view all matches for this distribution
view release on metacpan or search on metacpan
PM_TO_BLIB = lib/AI/Logic/AnswerSet.pm \
blib/lib/AI/Logic/AnswerSet.pm
# --- MakeMaker platform_constants section:
MM_Unix_VERSION = 6.55_02
PERL_MALLOC_DEF = -DPERL_EXTMALLOC_DEF -Dmalloc=Perl_malloc -Dfree=Perl_mfree -Drealloc=Perl_realloc -Dcalloc=Perl_calloc
# --- MakeMaker tool_autosplit section:
# Usage: $(AUTOSPLITFILE) FileToSplit AutoDirToSplitInto
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Module/Install/Metadata.pm view on Meta::CPAN
return $self;
}
sub version_from {
my ( $self, $file ) = @_;
require ExtUtils::MM_Unix;
$self->version( ExtUtils::MM_Unix->parse_version($file) );
}
sub abstract_from {
my ( $self, $file ) = @_;
require ExtUtils::MM_Unix;
$self->abstract(
bless(
{ DISTNAME => $self->name },
'ExtUtils::MM_Unix'
)->parse_abstract($file)
);
}
sub _slurp {
view all matches for this distribution
view release on metacpan or search on metacpan
bin/remote.pl view on Meta::CPAN
Lanny_Barbie
Lara_Roxx
Laura_Angel
Laura_Gemser
Laure_Sainclair
Lauren_Phoenix
Layla_Jade
Lea_De_Mae
Lea_Walker
Leanna_Foxxx
Leanna_Heart
bin/remote.pl view on Meta::CPAN
Penelope_Black_Diamond
Penny_Flame
Penny_Porsche
Persia
Phyllisha_Anne
Phoenix_Ray
Pixie
Poppy_Morgan
Porsche_Lynn
Porsha_Blaze
Rachel_Aziani
view all matches for this distribution
view release on metacpan or search on metacpan
xt/99-minimumversion.t
xt/99-pod.t
xt/99-synopsis.t
xt/99-test-prerequisites.t
xt/99-todo.t
xt/99-unix-text.t
xt/99-versions.t
xt/copyright.t
xt/meta-lint.t
view all matches for this distribution
view release on metacpan or search on metacpan
- Remove POD test files from distribution
- Remove bogus print left over from dev testing
- Fix possible undef warning
1.006
- Fix Makefile.pl / Makefile.PL issue that caused *nix installs to fail!
view all matches for this distribution
view release on metacpan or search on metacpan
xt/author/eol.t view on Meta::CPAN
't/cmdline-app.t',
't/optimize-multiple-full-test.t',
't/style-trailing-space.t'
);
eol_unix_ok($_, { trailing_whitespace => 1 }) foreach @files;
done_testing;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AI/TensorFlow/Libtensorflow/Manual/CAPI.pod view on Meta::CPAN
=head2 TF_NowNanos
=over 2
Returns the number of nanoseconds since the Unix epoch.
=back
/* From <tensorflow/c/env.h> */
TF_CAPI_EXPORT extern uint64_t TF_NowNanos(void);
=head2 TF_NowMicros
=over 2
Returns the number of microseconds since the Unix epoch.
=back
/* From <tensorflow/c/env.h> */
TF_CAPI_EXPORT extern uint64_t TF_NowMicros(void);
=head2 TF_NowSeconds
=over 2
Returns the number of seconds since the Unix epoch.
=back
/* From <tensorflow/c/env.h> */
TF_CAPI_EXPORT extern uint64_t TF_NowSeconds(void);
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Devel/CheckLib.pm view on Meta::CPAN
if ( $Config{cc} eq 'cl' ) { # Microsoft compiler
require Win32;
@sys_cmd = (@cc, $cfile, "/Fe$exefile", (map { '/I'.Win32::GetShortPathName($_) } @incpaths));
} elsif($Config{cc} =~ /bcc32(\.exe)?/) { # Borland
@sys_cmd = (@cc, (map { "-I$_" } @incpaths), "-o$exefile", $cfile);
} else { # Unix-ish
# gcc, Sun, AIX (gcc, cc)
@sys_cmd = (@cc, $cfile, (map { "-I$_" } @incpaths), "-o", "$exefile");
}
warn "# @sys_cmd\n" if $args{debug};
my $rv = $args{debug} ? system(@sys_cmd) : _quiet_system(@sys_cmd);
inc/Devel/CheckLib.pm view on Meta::CPAN
);
} elsif($Config{cc} eq 'CC/DECC') { # VMS
} elsif($Config{cc} =~ /bcc32(\.exe)?/) { # Borland
my @libpath = map { "-L$_" } @libpaths;
@sys_cmd = (@cc, "-o$exefile", "-l$lib", @libpath, $cfile);
} else { # Unix-ish
# gcc, Sun, AIX (gcc, cc)
my @libpath = map { "-L$_" } @libpaths;
@sys_cmd = (@cc, $cfile, "-o", "$exefile", "-l$lib", @libpath);
}
warn "# @sys_cmd\n" if $args{debug};
view all matches for this distribution
view release on metacpan or search on metacpan
Stage 4: Create an co-occurrence matrix
Stage 1: Install Programming Languages, if already installed go to Stage 2
Perl (version 5.16.3 or better) Perl is freely available at
<http://www.perl.org>. It is very likely that you will already have Perl
installed if you are using a Unix/Linux based system.
Stage 2 - Install CPAN modules, if already installed go to Stage 3
If you have supervisor access, or have configured MCPAN for local
install, you can install each of these via:
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AMF/Perl/IO/OutputStream.pm view on Meta::CPAN
{
my ($self, $d)=@_;
# pack the bytes
my $b = pack("d", $d);
my @b = split //, $b;
# atleast on *nix the bytes have to be reversed
# maybe not on windows, in php there in not flag to
# force whether the bytes are little or big endian
# for a double
my $r = "";
# reverse the bytes
view all matches for this distribution
view release on metacpan or search on metacpan
t/01-test.t view on Meta::CPAN
<startdate>10 Mar 22 16:18</startdate>
<suspended>0</suspended>
<suspendreason>not suspended</suspendreason>
<suspendtime></suspendtime>
<theme>x3</theme>
<unix_startdate>1269249522</unix_startdate>
<user>qewqeru</user>
</acct>
<acct>
<disklimit>unlimited</disklimit>
<diskused>0M</diskused>
t/01-test.t view on Meta::CPAN
<startdate>10 Mar 24 11:55</startdate>
<suspended>0</suspended>
<suspendreason>not suspended</suspendreason>
<suspendtime></suspendtime>
<theme>x</theme>
<unix_startdate>1269406518</unix_startdate>
<user>zseasd</user>
</acct>
<acct>
<disklimit>unlimited</disklimit>
<diskused>0M</diskused>
t/01-test.t view on Meta::CPAN
<startdate>10 Mar 22 16:21</startdate>
<suspended>0</suspended>
<suspendreason>not suspended</suspendreason>
<suspendtime></suspendtime>
<theme>x3</theme>
<unix_startdate>1269249671</unix_startdate>
<user>zseru</user>
</acct>
<status>1</status>
<statusmsg>Ok</statusmsg>
</listaccts>
t/01-test.t view on Meta::CPAN
<startdate>10 Mar 22 16:18</startdate>
<suspended>0</suspended>
<suspendreason>not suspended</suspendreason>
<suspendtime></suspendtime>
<theme>x3</theme>
<unix_startdate>1269249522</unix_startdate>
<user>qewqeru</user>
</acct>
<acct>
<disklimit>unlimited</disklimit>
<diskused>0M</diskused>
t/01-test.t view on Meta::CPAN
<startdate>10 Mar 24 11:55</startdate>
<suspended>1</suspended>
<suspendreason>test reason1</suspendreason>
<suspendtime>1269406521</suspendtime>
<theme>x</theme>
<unix_startdate>1269406518</unix_startdate>
<user>zseasd</user>
</acct>
<acct>
<disklimit>unlimited</disklimit>
<diskused>0M</diskused>
t/01-test.t view on Meta::CPAN
<startdate>10 Mar 22 16:21</startdate>
<suspended>0</suspended>
<suspendreason>not suspended</suspendreason>
<suspendtime></suspendtime>
<theme>x3</theme>
<unix_startdate>1269249671</unix_startdate>
<user>zseru</user>
</acct>
<status>1</status>
<statusmsg>Ok</statusmsg>
</listaccts>
t/01-test.t view on Meta::CPAN
<startdate>10 Mar 22 16:18</startdate>
<suspended>0</suspended>
<suspendreason>not suspended</suspendreason>
<suspendtime></suspendtime>
<theme>x3</theme>
<unix_startdate>1269249522</unix_startdate>
<user>qewqeru</user>
</acct>
<acct>
<disklimit>unlimited</disklimit>
<diskused>0M</diskused>
t/01-test.t view on Meta::CPAN
<startdate>10 Mar 22 16:21</startdate>
<suspended>0</suspended>
<suspendreason>not suspended</suspendreason>
<suspendtime></suspendtime>
<theme>x3</theme>
<unix_startdate>1269249671</unix_startdate>
<user>zseru</user>
</acct>
<status>1</status>
<statusmsg>Ok</statusmsg>
</listaccts>
t/01-test.t view on Meta::CPAN
<startdate>10 Mar 22 16:18</startdate>
<suspended>0</suspended>
<suspendreason>not suspended</suspendreason>
<suspendtime></suspendtime>
<theme>x3</theme>
<unix_startdate>1269249522</unix_startdate>
<user>qewqeru</user>
</acct>
<status>1</status>
<statusmsg>Ok</statusmsg>
</listaccts>
view all matches for this distribution
view release on metacpan or search on metacpan
t/01-test.t view on Meta::CPAN
ok($ip_list && ref $ip_list eq 'ARRAY' && scalar @$ip_list, 'API::DirectAdmin::Ip::list');
my %answer = (
text => "User $manipulate_user created",
error => 0,
details => 'Unix User created successfully
Users System Quotas set
Users data directory created successfully
Domains directory created successfully
Domains directory created successfully in users home
Domain Created Successfully');
view all matches for this distribution
view release on metacpan or search on metacpan
Revision history for API::GitForge
0.007 2022-01-02 15:59:09-07:00 America/Phoenix
- README: include an entry for API::GitForge::Role::GitForge near the top,
as that API is probably the one someone wants to look at first.
0.006 2021-02-09 15:10:36-07:00 America/Phoenix
- API::GitForge::Role::GitForge::clean_fork(): fix checking the exit
status of the push of the gitforge branch.
0.005 2020-05-24 08:04:55-07:00 America/Phoenix
- API::GitForge::Role::GitForge::clean_repo(): don't continue if
fail to push the gitforge branch.
- API::GitForge::GitLab::_clean_config_repo(): use target project
namespace rather than always using the user's namespace.
0.004 2020-03-13 17:28:05-07:00 America/Phoenix
- API::GitForge::Role::GitForge::clean_repo(): reinstate
workaround -- bypass Git::Wrapper when pushing the gitforge
branch.
0.003 2020-03-10 09:21:28-07:00 America/Phoenix
- API::GitForge::GitLab::_ensure_repo(): avoid an unnecessary API
call.
- API::GitForge::Role::GitForge::clean_repo(): try to unprotect
fork branches before deleting them, if GitForge API library
supports doing this.
- API::GitForge::Role::GitForge::clean_repo(): push the gitforge
branch using Git::Wrapper again.
During early testing, this seemed to hang after pushing to
GitLab installations, but it seems to work well now.
0.002 2020-03-09 12:17:47-07:00 America/Phoenix
- Implement API::GitForge::GitLab::_ensure_repo().
- Add git repo metadata to dist.ini.
- Don't disable merge requests in GitLab clean forks.
Otherwise we can't submit merge requests upstream.
- Code cleanup.
0.001 2020-02-16 16:20:35-07:00 America/Phoenix
- First public release.
view all matches for this distribution
view release on metacpan or search on metacpan
TO_INST_PM = lib/API/INSEE/Sirene.pm
# --- MakeMaker platform_constants section:
MM_Unix_VERSION = 7.34
PERL_MALLOC_DEF = -DPERL_EXTMALLOC_DEF -Dmalloc=Perl_malloc -Dfree=Perl_mfree -Drealloc=Perl_realloc -Dcalloc=Perl_calloc
# --- MakeMaker tool_autosplit section:
# Usage: $(AUTOSPLITFILE) FileToSplit AutoDirToSplitInto
view all matches for this distribution
view release on metacpan or search on metacpan
lib/API/Instagram/Search.pm view on Meta::CPAN
my $search = $instagram->search('media');
$search->find(
lat => 48.858844, # Latitude of the center search coordinate. If used, lng is required.
lng => 2.294351, # Longitude of the center search coordinate. If used, lat is required.
min_timestamp => 1408720000, # A unix timestamp. All media returned will be taken later than this timestamp.
max_timestamp => 1408723333, # A unix timestamp. All media returned will be taken earlier than this timestamp.
distance => 500, # Default is 1km (distance=1000), max distance is 5km.
);
See L<http://instagram.com/developer/endpoints/media/#get_media_search>.
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Module/Install/Can.pm view on Meta::CPAN
*ExtUtils::MM_Cygwin::maybe_command = sub {
my ($self, $file) = @_;
if ($file =~ m{^/cygdrive/}i and ExtUtils::MM_Win32->can('maybe_command')) {
ExtUtils::MM_Win32->maybe_command($file);
} else {
ExtUtils::MM_Unix->maybe_command($file);
}
}
}
}
view all matches for this distribution
view release on metacpan or search on metacpan
scripts/arcxd.conf view on Meta::CPAN
fs = Fs
vos = Fs
pv = Pv
chown = Unix
mkdir = Unix
rmdir = Unix
mv = Unix
acl = Acl
kstart = Arc::Command::Kstart
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ARGV/ENV.pm view on Meta::CPAN
...
=head1 DESCRIPTION
This module searches the first non-empty environment variable with one of the
names given at import time, parses it like the Unix shell (using
L<Text::ParseWords>::shellwords) and insert the result at the beginning of
C<@ARGV>.
This module is helpful to implement command-line scripts that take some
global config as an environnement variable containing command-line flags.
view all matches for this distribution
view release on metacpan or search on metacpan
example/ars_ExecuteProcess.pl view on Meta::CPAN
# ars_ExecuteProcess.pl [server] [username] [password] ["process"]
# if you need to use a specified TCP port, export the ARTCPPORT environment variable
# with the TCP Port number
#
# EXAMPLE
# ars_ExecuteProcess.pl arserver user password "ls -l /" (if the server is on Unix)
# ars_ExecuteProcess.pl arserver user password " cmd /c dir" (if the server is on Win32)
# ars_ExecuteProcess.pl arserver user password Application-Generate-GUID
#
# DESCRIPTION
# Execute given command on remote arserver. Requires admin account to work.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ASNMTAP/Asnmtap/Plugins/Modem.pm view on Meta::CPAN
unless ( $parms{port} =~ /^com[1-4]$/ ) {
$$asnmtapInherited->pluginValues ( { stateValue => $ERRORS{UNKNOWN}, error => 'Invalid Windows port: '. $parms{port} }, $TYPE{APPEND} );
return ( $ERRORS{UNKNOWN} );
}
} else { # running on Linix
eval "use Net::Ifconfig::Wrapper";
$parms{windows} = 0;
unless ( $parms{port} =~ /^\/dev\/ttyS[0-3]$/ ) {
$$asnmtapInherited->pluginValues ( { stateValue => $ERRORS{UNKNOWN}, error => 'Invalid Linux port: '. $parms{port} }, $TYPE{APPEND} );
view all matches for this distribution
view release on metacpan or search on metacpan
free to use it if you find it useful.
=head1 NOTES
This module is designed to work with both ASP PerlScript on IIS4,
as well as mod_perl/Apache::ASP on *nix platforms. Apache::ASP
already provides some of the functionality provided by this module;
because of this (and to avoid redundancy), ASP.pm attempts to detect
its environment. Differences between Apache and MS ASP are noted.
Both of the print() and warn() standard perl funcs are overloaded
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Module/Install/Can.pm view on Meta::CPAN
*ExtUtils::MM_Cygwin::maybe_command = sub {
my ($self, $file) = @_;
if ($file =~ m{^/cygdrive/}i and ExtUtils::MM_Win32->can('maybe_command')) {
ExtUtils::MM_Win32->maybe_command($file);
} else {
ExtUtils::MM_Unix->maybe_command($file);
}
}
}
}
view all matches for this distribution