Simple bar chart constructed from a csv file storing the number of ports in each category
#!/usr/local/bin/perl -w
use FreeBSD::Ports;
my @catagories =
(qw/
accessibility arabic archivers astro audio benchmarks biology
#!/bin/sh | |
pw group add -n admin -g 9999 | |
echo vagrant | pw mod user root -h 0 | |
echo vagrant | pw add user vagrant -u 9999 -c "Vagrant User" -k /etc/skel -m -d /home/vagrant -g admin -s /bin/sh -h 0 | |
mkdir /home/vagrant/.ssh | |
chown vagrant:vagrant /home/vagrant/.ssh | |
chmod 700 /home/vagrant/.ssh |
#!/usr/bin/perl | |
use strict; | |
use warnings; | |
sub fisher_yates_shuffle | |
{ | |
my $array = shift; | |
my $i = @$array; | |
while ( --$i ) |
_cidr2mask() | |
{ | |
local i mask="" | |
local full_octets=$(($1 / 8)) | |
local partial_octet=$(($1 % 8)) | |
for((i = 0; i < 4; i += 1)) | |
do | |
if [ $i -lt $full_octets ] | |
then |
It's a red bikeshed | |
It's a orange bikeshed | |
It's a yellow bikeshed | |
It's a green bikeshed | |
It's a blue bikeshed | |
It's a purple bikeshed | |
It's Jordan Hubbard | |
It's Marshall Kirk McKusick | |
It's Alfred Perlstein | |
It's Robert Watson |
Simple bar chart constructed from a csv file storing the number of ports in each category
#!/usr/local/bin/perl -w
use FreeBSD::Ports;
my @catagories =
(qw/
accessibility arabic archivers astro audio benchmarks biology
--- NaServer.old 2012-02-15 15:56:33.593579000 -0500 | |
+++ NaServer.pm 2012-02-17 10:23:49.242005000 -0500 | |
@@ -26,10 +26,8 @@ | |
use Socket; | |
use LWP::UserAgent; | |
use XML::Parser; | |
-eval "require Net::SSLeay"; | |
-eval "require IO::Select"; | |
+use Data::Dumper; | |
use NaElement; |
/*********************************************************************** | |
* connect.c -- Make socket connection using SOCKS4/5 and HTTP tunnel. | |
* | |
* Copyright (c) 2000-2004 Shun-ichi Goto | |
* Copyright (c) 2002, J. Grant (English Corrections) | |
* | |
* This program is free software; you can redistribute it and/or | |
* modify it under the terms of the GNU General Public License | |
* as published by the Free Software Foundation; either version 2 | |
* of the License, or (at your option) any later version. |
logging { | |
channel server_general { | |
file "/var/log/named/general.log" versions 5 size 5M; | |
print-time yes; | |
severity info; | |
}; | |
channel server_updates { | |
file "/var/log/named/update.log" versions 5 size 5M; |
-----BEGIN PGP PUBLIC KEY BLOCK----- | |
Version: PGP Key Server 0.9.6 | |
mQGiBEm+VN4RBACfYJ2U3THLZz/soW+0z18vsGdndRtf/i1FDPxr6gy53/VVOMPx | |
a1usmGriEtK0En7cwWlPQlr5SdXl/pUNKsIZkClkZnctWPeSM3mYj6zC3HcUyruV | |
rDNKUYLOYP8dCEtWu7IN0TQKH6xnqLljCFCQYK7lA4zRL7N1S/hExcBsbwCgzT6V | |
aI0NyeWVcAjs/+t8s4RJkC8D/jNpGb6IuRumkjYZ5GmElelckkmIQvGs2aiBkbE8 | |
IRtDS3VnSUWCN8rWJqqHuwg0QgaDVIHPz5KnMQfv7gbsoGilTx8mTgDEk1P62t4b | |
Y4YLKJhriaXyrSuQETPinqM3qYvEKysm5bkgiRNEcFHGUZznec2LGtFxPOGAacKn | |
EwcpA/9UIKdxxsPx8sHCU6L+Teq9DXpeRLRCy/1DJAHXs2BixAGX8kTvvdKnGjNR |
#!/bin/sh | |
SENDQ_SIZE=65536 | |
_parse_netstat() | |
{ | |
netstat -p tcp -n | awk 'BEGIN { count = 0 } | |
{ | |
if($6 == "ESTABLISHED" && $3 >= threshold) | |
{ |