Result:
found more than 421 distributions - search limited to the first 2001 files matching your query
( run in 2.477 )
App-Bin4TSV-8
view release on metacpan or search on metacpan
colsummary
crosstable
csel
csv2tsv
digitdemog
expandtab
venn
=head1 DESCRIPTION
=head1 SEE ALSO
App-Bin4TSV-9
view release on metacpan or search on metacpan
colsummary
crosstable
csel
csv2tsv
digitdemog
expandtab
freq
venn
=head1 DESCRIPTION
App-BinPackUtils
view release on metacpan or search on metacpan
"Data::Sah::Compiler::perl::TH::array" : "0",
"Data::Sah::Compiler::perl::TH::bool" : "0",
"Data::Sah::Compiler::perl::TH::float" : "0",
"Data::Sah::Compiler::perl::TH::int" : "0",
"Data::Sah::Compiler::perl::TH::str" : "0",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"IPC::System::Options" : "0.335",
"Log::ger" : "0.037",
"Perinci::CmdLine::Any" : "0",
"Perinci::CmdLine::Lite" : "1.827",
App-BookmarkFeed
view release on metacpan or search on metacpan
t/2016-11-14_Trump.md view on Meta::CPAN
[America is facing an epistemic crisis](https://www.vox.com/policy-and-politics/2017/11/2/16588964/america-epistemic-crisis): “an increasingly large chunk of Americans believes a whole bunch of crazy things, and it is warping our politics. […] wh...
[4chan: The Skeleton Key to the Rise of Trump](https://medium.com/@DaleBeran/4chan-the-skeleton-key-to-the-rise-of-trump-624e7cb798cb#.gy75qh8wa). “Like the Hollywood heroes, right and left have been competing to become this new radical anti-/statu...
[This Political Theorist Predicted the Rise of Trumpism. His Name Was Hunter S. Thompson.](https://www.thenation.com/article/this-political-theorist-predicted-the-rise-of-trumpism-his-name-was-hunter-s-thompson/) “As Thompson presciently wrote in t...
[Authoritarianism and Post-Truth Politics](https://niskanencenter.org/blog/authoritarianism-post-truth-politics/). “[...] insisting on the difference between truth and lies is itself a part of the defense of freedom. Orwell, Arendt, and Havel teach...
[You Are Still Crying Wolf](http://slatestarcodex.com/2016/11/16/you-are-still-crying-wolf/). A long piece debunking the myth that Trump is a racist. He’s terrible for different reasons.
App-Build
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
# Save this 'cause CPAN will chdir all over the place.
my $cwd = Cwd::cwd();
CPAN::Shell->install('Module::Build::Compat');
CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate
or die "Couldn't install Module::Build, giving up.\n";
chdir $cwd or die "Cannot chdir() back to $cwd: $!";
}
eval "use Module::Build::Compat 0.02; 1" or die $@;
App-CELL
view release on metacpan or search on metacpan
lib/App/CELL/Load.pm view on Meta::CPAN
if ( $sitedir = $ENV{ $paramhash{enviro} } ) {
$log_message = "Found viable sitedir in " . $paramhash{enviro}
. " environment variable";
last GET_CANDIDATE_DIR if is_directory_viable( $sitedir );
$reason = "CELL load routine received 'enviro' argument ->$paramhash{enviro}<- " .
"which expanded to ->$sitedir<- but this is not a viable directory " .
"($App::CELL::Util::not_viable_reason)";
return App::CELL::Status->new( level => 'ERR', code => $reason );
} else {
$reason = "CELL load routine: enviro argument contained ->$paramhash{enviro}<- " .
"but no such variable found in the environment";
App-CLI
view release on metacpan or search on metacpan
inc/Module/AutoInstall.pm view on Meta::CPAN
while ( my ( $pkg, $ver ) = splice( @modules, 0, 2 ) ) {
MY::preinstall( $pkg, $ver ) or next if defined &MY::preinstall;
print "*** Installing $pkg...\n";
my $obj = CPAN::Shell->expand( Module => $pkg );
my $success = 0;
if ( $obj and _version_cmp( $obj->cpan_version, $ver ) >= 0 ) {
my $pathname = $pkg;
$pathname =~ s/::/\\W/;
App-CMAM
view release on metacpan or search on metacpan
inc/Module/AutoInstall.pm view on Meta::CPAN
while ( my ( $pkg, $ver ) = splice( @modules, 0, 2 ) ) {
MY::preinstall( $pkg, $ver ) or next if defined &MY::preinstall;
print "*** Installing $pkg...\n";
my $obj = CPAN::Shell->expand( Module => $pkg );
my $success = 0;
if ( $obj and defined( _version_check( $obj->cpan_version, $ver ) ) ) {
my $pathname = $pkg;
$pathname =~ s/::/\\W/;
App-CPAN-Get
view release on metacpan or search on metacpan
Get/Utils.pm view on Meta::CPAN
# Code from Menlo::CLI::Compat
sub process_module_name_and_version {
my $module_string = shift;
# Plack@1.2 -> Plack~"==1.2"
# BUT don't expand @ in git URLs
$module_string =~ s/^([A-Za-z0-9_:]+)@([v\d\._]+)$/$1~== $2/;
# Plack~1.20, DBI~"> 1.0, <= 2.0"
my ($module_name, $module_version_range);
if ($module_string =~ /\~[v\d\._,\!<>= ]+$/) {
App-CPANChangesCwaliteeUtils
view release on metacpan or search on metacpan
"Data::Sah::Coerce::perl::To_str::From_str::normalize_perl_modname" : "0",
"Data::Sah::Compiler::perl::TH::array" : "0",
"Data::Sah::Compiler::perl::TH::bool" : "0",
"Data::Sah::Compiler::perl::TH::int" : "0",
"Data::Sah::Compiler::perl::TH::str" : "0",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"Perinci::CmdLine::Any" : "0",
"Perinci::CmdLine::Lite" : "1.827",
"Sah::Schema::pathname" : "0",
"Sah::Schema::perl::modname" : "0.035",
App-CPANChangesUtils
view release on metacpan or search on metacpan
"runtime" : {
"requires" : {
"CPAN::Changes" : "0",
"Data::Sah::Compiler::perl::TH::bool" : "0.911",
"Data::Sah::Compiler::perl::TH::str" : "0.911",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"Data::Sah::Filter::perl::Perl::normalize_perl_modname" : "0",
"Data::Structure::Util" : "0",
"Log::ger" : "0.038",
"Perinci::CmdLine::Any" : "0.152",
App-CPANIDX
view release on metacpan or search on metacpan
inc/Module/AutoInstall.pm view on Meta::CPAN
while ( my ( $pkg, $ver ) = splice( @modules, 0, 2 ) ) {
MY::preinstall( $pkg, $ver ) or next if defined &MY::preinstall;
print "*** Installing $pkg...\n";
my $obj = CPAN::Shell->expand( Module => $pkg );
my $success = 0;
if ( $obj and _version_cmp( $obj->cpan_version, $ver ) >= 0 ) {
my $pathname = $pkg;
$pathname =~ s/::/\\W/;
App-CPANModulesUtils
view release on metacpan or search on metacpan
"Data::Dump" : "0",
"Data::Sah::Compiler::perl::TH::array" : "0.910",
"Data::Sah::Compiler::perl::TH::bool" : "0.910",
"Data::Sah::Compiler::perl::TH::int" : "0.910",
"Data::Sah::Compiler::perl::TH::str" : "0.910",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"Data::Sah::Filter::perl::Perl::normalize_perl_modname" : "0",
"File::Path" : "0",
"File::Slurper" : "0",
"HTML::LinkExtor" : "0",
App-CPANtoRPM
view release on metacpan or search on metacpan
lib/App/CPANtoRPM.pm view on Meta::CPAN
$self->_log_message('INFO',"Using CPAN");
my $err = $self->_load_module("CPAN::Shell");
$err = $self->_load_module("CPAN") if (! $err);
if (! $err) {
my $mod = CPAN::Shell->expand('Module', $package);
if (! $mod) {
$self->_log_message('ERR',"CPAN: Module not found: $package");
}
App-CSVUtils-csv_mix_formulas
view release on metacpan or search on metacpan
"requires" : {
"App::CSVUtils" : "0.032",
"Data::Sah::Compiler::perl::TH::array" : "0.914",
"Data::Sah::Compiler::perl::TH::bool" : "0.914",
"Data::Sah::Compiler::perl::TH::str" : "0.914",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"List::Util" : "1.54",
"Log::ger" : "0.038",
"Perinci::CmdLine::Any" : "0.154",
"Perinci::CmdLine::Lite" : "1.924",
App-CSVUtils
view release on metacpan or search on metacpan
lib/App/CSVUtils/csv_fill_cells.pm view on Meta::CPAN
the required number of rows and/or columns will be used.
Additional options planned:
- what to do when there are less values to completely fill the output CSV
(whether to always expand or expand when necessary, which is the default).
- what to do when there are more values (extend the table or ignore the extra
input values, which is the default).
_
lib/App/CSVUtils/csv_fill_cells.pm view on Meta::CPAN
Additional options planned:
=over
=item * what to do when there are less values to completely fill the output CSV
(whether to always expand or expand when necessary, which is the default).
=item * what to do when there are more values (extend the table or ignore the extra
input values, which is the default).
=back
App-CSelUtils
view release on metacpan or search on metacpan
"Data::CSel" : "0.128",
"Data::CSel::WrapStruct" : "0.004",
"Data::Dmp" : "0.242",
"Data::Sah::Compiler::perl::TH::array" : "0.911",
"Data::Sah::Compiler::perl::TH::str" : "0.911",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"File::Slurper" : "0",
"Perinci::CmdLine::Any" : "0.152",
"Perinci::CmdLine::Lite" : "1.915",
"Perinci::Sub::Property::cmdline" : "0",
App-CamelPKI
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
# Save this 'cause CPAN will chdir all over the place.
my $cwd = Cwd::cwd();
CPAN::Shell->install('Module::Build::Compat');
CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate
or die "Couldn't install Module::Build, giving up.\n";
chdir $cwd or die "Cannot chdir() back to $cwd: $!";
}
eval "use Module::Build::Compat 0.02; 1" or die $@;
App-CekBpom
view release on metacpan or search on metacpan
"runtime" : {
"requires" : {
"Data::Sah::Compiler::perl::TH::array" : "0.911",
"Data::Sah::Compiler::perl::TH::bool" : "0.911",
"Data::Sah::Compiler::perl::TH::str" : "0.911",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"Date::Format::ISO8601" : "0",
"Exporter" : "5.57",
"HTTP::CookieJar::LWP" : "0",
"JSON::Encode::TableData" : "0",
App-Changelog2x
view release on metacpan or search on metacpan
lib/App/Changelog2x.pm view on Meta::CPAN
$params ||= {}; # In case they didn't pass any
our $parser = XML::LibXML->new();
our $xslt = XML::LibXSLT->new();
$parser->expand_xinclude(1);
$xslt->register_function(URI, 'format-date',
sub { $self->format_date(@_) });
$xslt->register_function(URI, 'credits',
sub { $self->credits(@_) });
App-Chart
view release on metacpan or search on metacpan
lib/App/Chart/Gtk2/AdjScale.pm view on Meta::CPAN
# gravity up,down,centre
# stick to start/end if already there
# which of upper/lower to grow
# set_page_range wait until first size_allocate to decide vpp,ppv
# choice keep vpp same and expand page, or keep page and adjust vpp
# integer ppv
package App::Chart::Gtk2::AdjScale;
App-Cheats
view release on metacpan or search on metacpan
#############################################################
## Perl Modules - bignum
#############################################################
# Convert big numbers into full form
# from scientific notation to expanded form
echo "$b" | perl -Mbignum -lpe '$_ += 0'
#############################################################
## Perl Modules - binmode
'
# TODO: Check if Unigraph is perl tk
# Create Menu Buttons (PTk,bind method)
perl -MTk -le '$mw=MainWindow->new; $mw->Button(-text => "Exit", -command => sub{exit})->pack(-side => "bottom", -fill => "both", -expand => 1); $f=$mw->Frame(-relief => "ridge", -borderwidth => 2)->pack(-side => "top", -expand => 1, -fill => "both")...
# Perk Tk Event Types (PTk,bind method)
ButtonPress (or Button)
ButtonRelease
Circulate
# Swap frames of buttons (PTk)
perl -MTk -le '$mw=MainWindow->new; my @b; sub id{my($n)=grep{$b[$_] eq $_[0]}0..$#b; $n} for my $fi(1..3){my $f=$mw->Frame->pack; push @b,$f; $f->Button(-text => "Btn - $fi - $_", -width => 20)->pack(-side => "left") for 1..3} $mw->bind("<ButtonRele...
# Notebook example 1. multiple pages/tabs (PTk)
perl -MTk -MTk::NoteBook -le '$nb=MainWindow->new->NoteBook->pack(-fill => "both", -expand => 1); @pgs = map { $nb->add("page$_", -label => "Page $_") } 0..5; $pgs[0]->Button(-text => "Button $_")->pack(-fill => "both") for 1..5; $pgs[1]->Label(-text...
# Notebook example 2. multiple pages/tabs (PTk)
# Command when clicking a page/tab
perl -MTk -MTk::NoteBook -le '$nb=MainWindow->new->NoteBook(-font => "Courier 14 bold")->pack(-fill => "both", -expand => 1); @pgs = map { $nb->add("page$_", -label => "Page $_") } 0..20; $pgs[0]->Button(-text => "Button $_")->pack(-fill => "both") f...
# Notebook example 3. multiple pages/tabs (PTk)
# Page deletion
perl -MTk -MTk::NoteBook -le '$nb=MainWindow->new->NoteBook->pack(-fill => "both", -expand => 1); @pgs = map { $nb->add("page$_", -label => "Page $_") } 0..10; $nb->pagecget("page0", "-state"); $pgs[0]->Button(-text => "Button $_")->pack(-fill => "bo...
# Notebook example 4. multiple pages/tabs (PTk)
# Get page by name
perl -MTk -MTk::NoteBook -le '$nb=MainWindow->new->NoteBook->pack(-fill => "both", -expand => 1); @pgs = map { $nb->add("page$_", -label => "Page $_") } 0..10; $nb->pagecget("page0", "-state"); $pgs[0]->Button(-text => "Button $_")->pack(-fill => "bo...
# Notebook example 5. multiple pages/tabs (PTk)
# 2 rows
perl -MTk -MTk::NoteBook -le '$nb=MainWindow->new->NoteBook->pack(-fill => "both", -expand => 1); $nb->add("page0$_", -label => "Page $_") for 1..5; map { my $nb = $_; $nb->add("page1$_", -label => "Page $_") for 6..10; } map $_->NoteBook->pack, ma...
# Notebook example 6. multiple pages/tabs (PTk)
perl -MTk -MTk::NoteBook -le '$nb=MainWindow->new->NoteBook->pack; $nb->add("page0$_", -label => "Page $_") for 1..5; @pgs = map $nb->page_widget($_), $nb->pages; ($p,@rest)=@pgs; $nb1=$p->NoteBook->pack; $nb1->add("page1$_", -label => "Page $_") for...
# Entry widget validation options (PTk)
..............................
..............................
perl -MTk -le '$w=MainWindow->new; $s=30; $p=pack("b$s"x$s,`cat start.bm`); $w->DefineBitmap(start => $s,$s,$p); $w->Button(-bitmap => "start")->pack; MainLoop'
# DirTree example (PTk)
perl -MTk -le 'MainWindow->new->Scrolled("DirTree")->pack(qw/-fill both -expand 1/); MainLoop'
# LabEntry example (PTk,label and entry in one)
perl -MTk -le 'tkinit->LabEntry(-label => "name", -textvariable => \$name, -labelPack => [qw/ -side left /], -width => 20)->pack; MainLoop'
# Clicking a button will send it to the top. Cycle through
#############################################################
## Perl Modules - Tk (Appendix B)
#############################################################
# Adjuster example (PTk,Appendix B)
perl -MTk -le '$w=tkinit; %def=qw/-fill both -expand 1/; $b=$w->Button(-text => "Button A")->pack(%def); $w->Adjuster(-side => "top", -widget => $b)->pack(qw/-fill x/); $w->Button(-text => "Button B")->pack(%def); MainLoop'
# Balloon Example (Ptk,Appendix B)
perl -MTk -le '$w=tkinit; $btn=$w->Button(-text => "Button A")->pack; $bl=$w->Balloon; $bl->attach($btn, -msg => "click me"); MainLoop'
# Bitmap Example (Ptk,Appendix B)
# Label Example (Ptk,Appendix B)
# LabEntry Example (Ptk,Appendix B)
# Learn how to use Text indices (demo)
perl -MTk -le '%def=qw/-side left/; $mw=tkinit; $t=$mw->Text->pack; ($i,$d)=map{my $v; $mw->LabEntry(-label => "$_:", -textvariable => \$v, -labelPack => [%def])->pack(%def); \$v} qw/Index Data/; $mw->Button(-text => "INSERT", -command => sub{$t->ins...
# LabFrame Example (Ptk,Appendix B)
# ListBox Example (Ptk,Appendix B)
# Check the value/status of an option (Vim)
:set <option>?
:set ic? # noignorecase
# Show full path, get the head, then the tail (Vim)
:echo expand("%:p:h:t")
# Toggle an option (Vim)
:set number!
:set number!
# Comment lines in vimrc should start with "
" this is a comment
# Name of file that is opened in vim
let _curfile = expand("%:t")
# Show line numbers in vim (vimrc)
set number
# Vim resource (vimrc) file. other features.
App-CheckArchiveFilename
view release on metacpan or search on metacpan
},
"runtime" : {
"requires" : {
"Data::Sah::Compiler::perl::TH::array" : "0.914",
"Data::Sah::Compiler::perl::TH::str" : "0.914",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"Filename::Archive" : "0.033",
"Filename::Compressed" : "0.050",
"Perinci::CmdLine::Any" : "0.154",
"Perinci::CmdLine::Lite" : "1.924",
App-CheckPerlReleaseFilename
view release on metacpan or search on metacpan
},
"runtime" : {
"requires" : {
"Data::Sah::Compiler::perl::TH::array" : "0.914",
"Data::Sah::Compiler::perl::TH::str" : "0.914",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"Filename::Type::Perl::Release" : "0",
"Perinci::CmdLine::Any" : "0.154",
"Perinci::CmdLine::Lite" : "1.924",
"Sah::Schema::filename" : "0",
App-Checklist-Formatter
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
# Save this 'cause CPAN will chdir all over the place.
my $cwd = Cwd::cwd();
CPAN::Shell->install('Module::Build::Compat');
CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate
or die "Couldn't install Module::Build, giving up.\n";
chdir $cwd or die "Cannot chdir() back to $cwd: $!";
}
eval "use Module::Build::Compat 0.02; 1" or die $@;
App-Chronicle
view release on metacpan or search on metacpan
lib/Chronicle/Config/Reader.pm view on Meta::CPAN
Comments may occur at the start, middle, or end of a line.
=item Environmental variable expansion
Environmental variables are expanded if they are detected.
=item Command-execution and expansion
If backticks are found in configuration values they will be replaced with the output of the specified command.
App-Cinema
view release on metacpan or search on metacpan
inc/Module/AutoInstall.pm view on Meta::CPAN
while ( my ( $pkg, $ver ) = splice( @modules, 0, 2 ) ) {
MY::preinstall( $pkg, $ver ) or next if defined &MY::preinstall;
print "*** Installing $pkg...\n";
my $obj = CPAN::Shell->expand( Module => $pkg );
my $success = 0;
if ( $obj and _version_cmp( $obj->cpan_version, $ver ) >= 0 ) {
my $pathname = $pkg;
$pathname =~ s/::/\\W/;
App-ClusterSSH
view release on metacpan or search on metacpan
lib/App/ClusterSSH.pm view on Meta::CPAN
$self->debug( 3, 'Expanded to ',
join( ' ', $self->cluster->get_tag($dirty) ) );
@tag_list = $self->cluster->get_tag($dirty);
}
else {
# don't expand if there is only one record found
$self->debug( 3, 'Only one A record' );
}
}
}
if (@tag_list) {
lib/App/ClusterSSH.pm view on Meta::CPAN
$self->config->{show_history} = 0;
}
else {
$windows{history}->pack(
-fill => "x",
-expand => 1,
);
$self->config->{show_history} = 1;
}
}
lib/App/ClusterSSH.pm view on Meta::CPAN
-insertborderwidth => 4,
-width => 25,
-class => 'cssh',
)->pack(
-fill => "x",
-expand => 1,
);
$windows{history} = $windows{main_window}->Scrolled(
"ROText",
-insertborderwidth => 4,
lib/App/ClusterSSH.pm view on Meta::CPAN
$windows{history}->bindtags(undef);
if ( $self->config->{show_history} ) {
$windows{history}->pack(
-fill => "x",
-expand => 1,
);
}
$windows{main_window}->bind( '<Destroy>' => sub { $self->exit_prog } );
App-Cmd-Starter
view release on metacpan or search on metacpan
inc/Module/AutoInstall.pm view on Meta::CPAN
while ( my ( $pkg, $ver ) = splice( @modules, 0, 2 ) ) {
MY::preinstall( $pkg, $ver ) or next if defined &MY::preinstall;
print "*** Installing $pkg...\n";
my $obj = CPAN::Shell->expand( Module => $pkg );
my $success = 0;
if ( $obj and _version_cmp( $obj->cpan_version, $ver ) >= 0 ) {
my $pathname = $pkg;
$pathname =~ s/::/\\W/;
App-Codeowners
view release on metacpan or search on metacpan
lib/App/Codeowners.pm view on Meta::CPAN
my $toplevel = git_toplevel('.') or die "Not a git repo\n";
my $codeowners_path = find_codeowners_in_directory($toplevel)
or die "No CODEOWNERS file in $toplevel\n";
local $ENV{GIT_CODEOWNERS_ALIASES} = 1 if $opts->{expand_aliases};
my $codeowners = $self->_parse_codeowners($codeowners_path);
my ($proc, $cdup) = run_git(qw{rev-parse --show-cdup});
$proc->wait and exit 1;
lib/App/Codeowners.pm view on Meta::CPAN
my %filter_patterns = map { $_ => 1 } @{$opts->{pattern}};
$proc = git_ls_files('.', $opts->args);
while (my $filepath = $proc->next) {
my $match = $codeowners->match(path($filepath)->relative($cdup),
expand => $opts->{expand_aliases});
if (%filter_owners) {
for my $owner (@{$match->{owners}}) {
goto ADD_RESULT if $filter_owners{$owner};
}
next;
( run in 2.477 seconds using v1.01-cache-2.11-cpan-97f6503c9c8 )