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
perl -MPOSIX -e'$t=strftime("%F_%T_%Z",localtime); $t =~ s/(\s|\:)/-/g; print $t,"\n";' |
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
const Lang = imports.lang; | |
const St = imports.gi.St; | |
const Cinnamon = imports.gi.Cinnamon; | |
const Applet = imports.ui.applet; | |
const Main = imports.ui.main; | |
const PopupMenu = imports.ui.popupMenu; | |
function DriveMenuItem(place) { | |
this._init(place); | |
} |
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
my $smtp_connection = $self->{'smtp_obj'} ||= do { | |
my $smtps_obj = eval { | |
require Net::SMTP::SSL; | |
my $s = Net::SMTP::SSL->new( | |
$args->{'smtp_server'}, | |
Port => 465, | |
Hello => $mail_domain, | |
Timeout => 10, | |
Debug => 0, | |
); |
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
perl -MFile::Find=find -Tlwe 'for $inc (@INC) { find { wanted => sub { return if !/\.pm\z/; ($a=$File::Find::name)=~s|^\Q$inc\E/||; $a =~ s/\//::/g; $a =~ s/(.*)\.pm$//g;print $1 }, no_chdir => 1 }, $inc }' |
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
perl -MFile::Find=find -MFile::Spec::Functions -Tlwe 'find { wanted => sub { print canonpath $_ if /\.pm\z/ }, no_chdir => 1 }, @INC' |
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
X=(`pacman -Ss xfce | sed -e's/\s.*//'`); yaourt -S $X |
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
X=(`pacman -Ss gstreamer0.10- | sed -e's/\s.*//'`); yaourt -S $X |
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/perl | |
use strict; | |
use warnings; | |
use Data::Dumper; | |
sub do_print { | |
for (keys %ENV) { | |
print "$_ => $ENV{$_}\n"; | |
} | |
} |
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
I had added this value to /etc/sysctl.conf: | |
# For PostgreSQL jails | |
security.jail.sysvipc_allowed=1 | |
I needed to set this in /etc/rc.conf | |
jail_sysvipc_allow="YES" # For PostgreSQL |
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/zsh | |
# Install all the packages for my Arch Linux Installs | |
yaourt -Syy; | |
W=(`pacman -Ss gimp | grep -v help | perl -p -i -e 's/^.*\/(.*).+/$1/xs' | sed -e's/\s.*//'`); | |
X=(`pacman -Ss ttf- | perl -p -i -e 's/^.*\/(.*).+/$1/xs' | sed -e's/\s.*//'`); | |
Y=(`pacman -Ss gstreamer0.10- | perl -p -i -e 's/^.*\/(.*).+/$1/xs' | sed -e's/\s.*//'`); | |
PACMAN=( abs ack ati-dri audex aurvote cabextract cdrdao cifs-utils clementine clojure ctags cups customizepkg cvs dnstracer dnsutils dvd+rw-tools easytag enchant faac findutils firefox flac flashplugin fpc fuse fuseiso gdb gdm gecko-mediaplayer geoip ghostscript gimp-help-en git gprolog gramps graphviz guifications gvfs gvfs-afc gvfs-afp gvfs-gphoto2 gvfs-smb gvim htop hunspell hunspell-en icedtea-web-java7 inetutils intel-dri iputils jre7-openjdk k3b kdegraphics-okular kdesdk-kate keychain lame lazarus lib32-ati-dri lib32-intel-dri lib32-nouveau-dri libgnomeui libgpod libreoffice libreoffice-en-US lua luakit mate mate-extras mercurial mesa mlocate multilib-devel net |