This file contains 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
#!/bin/sh | |
while true; do | |
ssid=$(/sbin/iwgetid -r) | |
connected=$? | |
if [ $connected -eq "0" ]; then | |
delimiter=" |" | |
else | |
delimiter="" |
This file contains 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
#!/bin/bash | |
web_service='nginx' | |
config_file="/usr/local/etc/le-renew-webroot.ini" | |
le_path='/opt/letsencrypt' | |
exp_limit=30 | |
if [ ! -f $config_file ]; then | |
echo "[ERROR] config file does not exist: $config_file" |
This file contains 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
#!/bin/bash | |
#function name is an ascii-bell | |
(){ | |
echo "This is the worst function name ever" | |
} | |
#call the function | |
This file contains 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
[alias] | |
hate = blame |
This file contains 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 5.10.0; | |
use strict; | |
use warnings; | |
my $input = shift @ARGV || die "Give me a number\n"; | |
sub factorial { | |
my ($n, $total) = @_; |
This file contains 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 5.10.0; | |
use strict; | |
use warnings; | |
my $input = shift @ARGV || die "Give me a number\n"; | |
sub factorial { | |
my $n = shift; |
This file contains 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
#!/sbin/runscript | |
# Copyright 1999-2013 Gentoo Foundation | |
# Distributed under the terms of the GNU General Public License v2 | |
# $Header: /var/cvsroot/gentoo-x86/www-servers/nginx/files/nginx.initd-r2,v 1.1 2013/05/13 12:18:11 dev-ze | |
ro Exp $ | |
extra_commands="configtest" | |
extra_started_commands="upgrade reload" | |
description="Robust, small and high performance http and reverse proxy server" |
This file contains 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
foreach(0..3){$i=<>;$c=" cents\n";$u="";use integer;{$q=$i/25;$d=($i-$q*25)/10;$n=($i-($d*10+$q*25))/5;$p=($i-($q*25+$d*10+$n*5));}$w=$q==0?$u:$q." x 25".$c;$x=$d==0?$u:$d." x 10".$c;$y=$n==0?$u:$n." x 5".$c;$z=$p==0?$u:$p." x 1".$c;chomp$i;print$i." cents:\n".$w.$x.$y.$z."\n";} |