Kirk Kimmel kimmel

## perltest.pl
#!/usr/bin/perl

#-----------------------------------------------------------------------------#
# Copyright (c) 2011 Kirk Kimmel. All rights reserved.

# Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:

#  1. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
#  2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
#  3. The name of the AUTHOR may not be used to endorse or promote products derived from this software without specific prior written permission.

## gist:1160144
use 5.8.2;

# Load the Module::Install bundled in ./inc/
use inc::Module::Install;

BEGIN { $ENV{NYTPROF} = 'start=no'; }

# Define metadata
name 'Task-Gtk2';
abstract '';

## gist:1215251
#!/usr/bin/perl

use warnings;
use strict;

my $show_banner  = 1;
my $color_patch  = 0;

# ANSI sequences for colours
my %colour;

## .perltidyrc
# PBP .perltidyrc file
# Uncomment #-st to fully emulate perltidy -pbp

-l=78   # Max line width is 78 cols
-i=4    # Indent level is 4 cols
-ci=4   # Continuation indent is 4 cols

#-st     # Output to STDOUT
-b      # Write the file inline and create a .bak file
-se     # Errors to STDERR

## gist:1306010
#!/usr/bin/perl

use warnings;
use strict;
use Shell::Command;

my $name = 'newfile.pl';

rm_rf '*.tar.gz';
touch $name;

## mech_test.pl
#!/usr/bin/perl

use v5.10;
use warnings;
use strict;
use autodie;
use POSIX qw( strftime );

use CHI;
use WWW::Mechanize::Cached::GZip;

## gist:2779203
<!doctype html>
<html lang="en-us" class="no-js">
<head>
<meta charset="utf-8" />
    <title>
      new PM design
    </title>

<meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0" />
<link rel="stylesheet" href="css/columnal.css" type="text/css" media="screen" />

## gist:2779229
<!doctype html>
<!--[if lt IE 7 ]> <html lang="en-us" class="no-js ie6"> <![endif]-->
<!--[if IE 7 ]>    <html lang="en-us" class="no-js ie7"> <![endif]-->
<!--[if IE 8 ]>    <html lang="en-us" class="no-js ie8"> <![endif]-->
<!--[if IE 9 ]>    <html lang="en-us" class="no-js ie9"> <![endif]-->
<!--[if (gt IE 9)|!(IE)]><!--> <html lang="en-us" class="no-js"> <!--<![endif]-->
<head>
<meta charset="utf-8" />
<meta http-equiv="X-UA-Compatible" content="IE=edge,chrome=1">
    <title>

## reset.css
/* http://meyerweb.com/eric/tools/css/reset/
   v2.0 | 20110126
   License: none (public domain)
*/

html, body, div, span, applet, object, iframe,
h1, h2, h3, h4, h5, h6, p, blockquote, pre,
a, abbr, acronym, address, big, cite, code,
del, dfn, em, img, ins, kbd, q, s, samp,
small, strike, strong, sub, sup, tt, var,

## gist:2922824
<!DOCTYPE html>
<!--[if lt IE 7 ]> <html lang="en-us" class="no-js ie6"> <![endif]-->
<!--[if IE 7 ]>    <html lang="en-us" class="no-js ie7"> <![endif]-->
<!--[if IE 8 ]>    <html lang="en-us" class="no-js ie8"> <![endif]-->
<!--[if IE 9 ]>    <html lang="en-us" class="no-js ie9"> <![endif]-->
<!--[if (gt IE 9)|!(IE)]><!--> <html lang="en-us" class="no-js"> <!--<![endif]-->
<head>
    <meta charset="utf-8">
    <meta http-equiv="X-UA-Compatible" content="IE=edge,chrome=1">
	#!/usr/bin/perl

	#-----------------------------------------------------------------------------#
	# Copyright (c) 2011 Kirk Kimmel. All rights reserved.

	# Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:

	# 1. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
	# 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
	# 3. The name of the AUTHOR may not be used to endorse or promote products derived from this software without specific prior written permission.
	use 5.8.2;

	# Load the Module::Install bundled in ./inc/
	use inc::Module::Install;

	BEGIN { $ENV{NYTPROF} = 'start=no'; }

	# Define metadata
	name 'Task-Gtk2';
	abstract '';
	#!/usr/bin/perl

	use warnings;
	use strict;

	my $show_banner = 1;
	my $color_patch = 0;

	# ANSI sequences for colours
	my %colour;
	# PBP .perltidyrc file
	# Uncomment #-st to fully emulate perltidy -pbp

	-l=78 # Max line width is 78 cols
	-i=4 # Indent level is 4 cols
	-ci=4 # Continuation indent is 4 cols

	#-st # Output to STDOUT
	-b # Write the file inline and create a .bak file
	-se # Errors to STDERR
	#!/usr/bin/perl

	use v5.10;
	use warnings;
	use strict;
	use autodie;
	use POSIX qw( strftime );

	use CHI;
	use WWW::Mechanize::Cached::GZip;
	<!doctype html>
	<html lang="en-us" class="no-js">
	<head>
	<meta charset="utf-8" />
	<title>
	new PM design
	</title>

	<meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0" />
	<link rel="stylesheet" href="css/columnal.css" type="text/css" media="screen" />
	<!doctype html>
	<!--[if lt IE 7 ]> <html lang="en-us" class="no-js ie6"> <![endif]-->
	<!--[if IE 7 ]> <html lang="en-us" class="no-js ie7"> <![endif]-->
	<!--[if IE 8 ]> <html lang="en-us" class="no-js ie8"> <![endif]-->
	<!--[if IE 9 ]> <html lang="en-us" class="no-js ie9"> <![endif]-->
	<!--[if (gt IE 9)\|!(IE)]><!--> <html lang="en-us" class="no-js"> <!--<![endif]-->
	<head>
	<meta charset="utf-8" />
	<meta http-equiv="X-UA-Compatible" content="IE=edge,chrome=1">
	<title>
	/* http://meyerweb.com/eric/tools/css/reset/
	v2.0 \| 20110126
	License: none (public domain)
	*/

	html, body, div, span, applet, object, iframe,
	h1, h2, h3, h4, h5, h6, p, blockquote, pre,
	a, abbr, acronym, address, big, cite, code,
	del, dfn, em, img, ins, kbd, q, s, samp,
	small, strike, strong, sub, sup, tt, var,