This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
" statusline: | |
set statusline=%-10.(%l\ of\ %L%)\ \ %<%r%{FindSub()}\ \ \ %=%{GitBranchInfoTokens()[0]}\ \ | |
" find sub: | |
function! FindSub() | |
let subpattern = '\(sub\|function\) \w\+' | |
let subline = search(subpattern, 'bnW') | |
if !subline | |
return 'not in sub' | |
else |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use feature 'say'; | |
use WWW::Curl::Easy; | |
my $curl = WWW::Curl::Easy->new; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# server.R | |
library('shiny') | |
shinyServer ( function (input, output) { | |
cute_level <- c("cute", "cuter", "cutest", "cutestest") |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
package Cats; | |
use strict; | |
use warnings; | |
use Web::Machine; | |
use Web::Machine::Util qw/bind_path/; | |
use Template::Jade qw/:all/; | |
use IO::All; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env python | |
# -*- coding: utf-8 -*- | |
from __future__ import with_statement | |
from os import walk, listdir | |
from glob import glob | |
from flask import Flask | |
from flask import render_template, request, redirect, url_for | |
import random |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
package Cats; | |
use strict; | |
use warnings; | |
use Web::Machine; | |
use Web::Machine::Util qw/bind_path/; | |
use Template::Jade qw/render_file/; | |
use Template; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use Mojolicious::Lite; | |
opendir(my $dir, 'public/catpics/') or die "Can't open kittydir!"; | |
my @catpics = readdir($dir); | |
get '/' => sub { | |
shift->render('index'); | |
}; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use Dancer2; | |
set 'template' => 'template_toolkit'; | |
opendir(my $dir, 'public/catpics/') or die "Can't open kittydir!"; | |
my @catpics = readdir($dir); | |
get '/' => sub { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env ruby | |
require 'sinatra'; | |
require 'slim'; | |
allcats = Dir.entries('public/catpics/') | |
get '/' do | |
slim :index | |
end |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use feature 'say'; | |
use Selenium::Remote::Driver; | |
my $driver = Selenium::Remote::Driver->new(); |