Skip to content

Instantly share code, notes, and snippets.

View LadyAleena's full-sized avatar
🙂
Still getting the hang of using git and GitHub together

Lady Aleena LadyAleena

🙂
Still getting the hang of using git and GitHub together
View GitHub Profile

Marvel films and television series

The Marvel Cinematic Universe

This is the Marvel Cinematic Universe and related films. The list is in release date order with television series separated by season.

  • Howard the Duck
  • Spider-Man
  • Spider-Man 2
  • Spider-Man 3

This is a list of television series that have two or more people in common with Supernatural.

Title Premier Finale Network Common[1]
Smallville 2001-10-16 2011-05-13 The CW
796
{"id":"tt0460681","title":"Supernatural","originalTitle":"","fullTitle":"Supernatural (TV Series 2005–2020)","type":"TVSeries","year":"2005","image":"https://imdb-api.com/images/original/MV5BNzRmZWJhNjUtY2ZkYy00N2MyLWJmNTktOTAwY2VkODVmOGY3XkEyXkFqcGdeQXVyMTkxNjUyNQ@@._V1_Ratio0.6791_AL_.jpg","releaseDate":"2005-09-13","runtimeMins":"44","runtimeStr":"44mins","plot":"This television drama is about the two Winchester brothers, Sam and Dean, who were raised by their father, John, to hunt and kill all things that go \"bump in the night\" after his wife, Mary, was murdered by an evil supernatural being when the boys were young. 22 years later the brothers set out on a journey, fighting evil along the way, to find their recently missing father who, when they finally meet up with, reveals he knows what killed their mother, a demon and has found a way to track and kill it. Meanwhile, Sam starts to develop frightening abilities that include death visions, visions of people dying before it actually happens. These visio
#!/usr/bin/perl
use strict;
use warnings;
use feature qw(say);
use Date::Calc qw(Delta_Days);
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$mon += 1;
$year += 1900;
#!perl
use strict;
use warnings;
use v5.8.8;
use Test::More tests => 18;
BEGIN {
use_ok( 'Date::Month::Number', qw(month_number) )
or die "Date::Month::Number is not available\n";
}
#!/usr/bin/perl
use strict;
use warnings;
use feature qw(say);
use File::Find;
use Path::Tiny qw(path);
my $dir = shift;
Perl::Critic::Policy::BuiltinFunctions::ProhibitBooleanGrep
Perl::Critic::Policy::BuiltinFunctions::ProhibitComplexMappings
Perl::Critic::Policy::BuiltinFunctions::ProhibitLvalueSubstr
Perl::Critic::Policy::BuiltinFunctions::ProhibitReverseSortBlock
Perl::Critic::Policy::BuiltinFunctions::ProhibitShiftRef
Perl::Critic::Policy::BuiltinFunctions::ProhibitSleepViaSelect
Perl::Critic::Policy::BuiltinFunctions::ProhibitStringyEval
Perl::Critic::Policy::BuiltinFunctions::ProhibitStringySplit
Perl::Critic::Policy::BuiltinFunctions::ProhibitUniversalCan
Perl::Critic::Policy::BuiltinFunctions::ProhibitUniversalIsa
package Page::File; # temporary name
use v5.8.8;
use strict;
use warnings;
use Exporter qw(import);
our @EXPORT_OK = qw(file_directory file_list file_menu);
use File::Spec;
#!/bin/bash
find . -type f -name "$1" -print0 | sort -z | while IFS= read -rd "" path; do
output=$(perlcritic -"$2" --color "$path");
if [[ $output = *OK ]]; then
printf "%s\n" "$output";
else
printf "\n%s\n%s\n\n" "$path" "$output";
fi;
done

Alternate Manual of Style for Plain Old Documentation

tl;dr This document describes an alternate, not replacement, manual of style (MoS) for Plain Old Documentation (POD) in Perl.

Introduction

I have been writing a lot of POD lately. I noticed my pinky finger on my right hand was getting tired and even a little painful. I looked at the POD and realized I had been using my pinky finger to hold down the shift key as I typed in the titles of the headings. If you are wondering why I did not use the Caps Lock key, it is because years ago, I repurposed it to be my compose key for my Linux system.

While massaging my pinky, I began wishing that the MoS would allow for sentence case for those headings. I then began wishing the POD was structured more like an article on the module, instead of just being a manual of use.