'perl' Category

• Book Review: Catalyst, Accelerating Perl Web Application Development

  April 11, 2008

  Recently I was contacted by a publisher from Packt publishing about reviewing a couple of books, after a long time (sorry I took so long!) I’m finally finished with my review of the first book, Catalyst: Accelerating Perl Web Application Development. Note that while I was asked, I wasn’t paid for this review, this is […]

  posted in book, catalyst, framework, mvc, perl, rails, review, script by Lee

• Fix for being unable to bootstrap fink on Leopard

  November 13, 2007

  If you run into the following error trying to bootstrap fink (I was using version 0.27.8) on Leopard: ./Command/failure………………….ok 1/0 ./Command/failure………………….NOK 24/0# Failed test at ./Command/failure.t line 85. # ” # != # ‘0’ ./Command/failure………………….ok 41/0# Looks like you failed 1 test of 49. ./Command/failure………………….dubious Test returned status 1 (wstat 256, 0x100) DIED. FAILED test […]

  posted in bootstrap, error, fink, fix, leopard, osx, perl by Lee

• PHFOS/CIOSim in 3 languages

  November 5, 2007

  I’ve spent the last week or so writing a customer emulation script for the QA group here to test some of our archiving products. If you’re unfamiliar with PHFOS/CIOSim, take a look here. In short, PHFOS/CIOSim is a small multi-threaded program that randomly selects files in a given directory to open and hold open. I […]

  posted in ciosim, customer, java, perl, phfos, programming, ruby, script by Lee

• Why PHFOS dies if you don’t use –readstop

  November 1, 2007

  Thanks to Jon for pointing this out to me, we’re pretty sure that the reason perl chokes and gives you a bus error (on OSX) when you run PHFOS [script] like this: ./phfos.pl -d <dir> -r -v –min=2 –max=3 -n 1000 We’re actually guessing that after allocating too many threads, since we aren’t immediately exiting […]

  posted in osx, perl, phfos, stack, threads by Lee

• PHFOS update – more than 20 threads useable

  October 29, 2007

  [UPDATE 10/30/07]: In the below post, use the link to the text file to get the latest version, I can’t edit the actual text on the page every time I update the script. The most up-to-date script can be found here. Just a small update, you *can* actually use more than ~20 threads when using […]

  posted in perl, script, thread by Lee

• PHFOS – Perl Hold File Open Script for stressing disk access like a customer environment

  October 25, 2007

  [UPDATE 10/29/07]: You can now use phfos with lots more threads, read this post It’s quick, it’s dirty, but here it is “PHFOS” (Note to self: get better at naming scripts). So here’s what it does. Basically, you specify a directory with some kind of files in it, the script then spawns <n> threads that […]

  posted in customer, perl, script, stress, thread by Lee

• Not-as-simple perl script for ZFS snapshot auditing

  June 5, 2007

  Hi everyone, I’m back again with another perl script to hopefully be useful to a few of you. Firstly, the script: http://lee.hinmanphoto.com/files/zdiff.txt (formatting long scripts in wordpress’ crazy editor is a very long and arduous process, thus I’m just linking to the script in this case, if anyone knows of a better place to stick […]

  posted in geekery, perl, security, software, solaris, sun, work, zfs by Lee

• Super-simple perl script for zfs snapshots

  June 1, 2007

  Here’s a simple script for creating daily zfs snapshots that get rotated every week (so you always have one for Mon, Tues, Wed, etc) #!/usr/bin/perl use warnings; use strict; my $zfsname = shift || die “Need a filesystem name\n”; my $day = `date`; $day =~ s/(Sun|Mon|Tue|Wed|Thu|Fri|Sat)[\S\s]+/$1/gi; my $snapname = “$zfsname\@$day”; my $exist = system(“zfs list […]

  posted in geekery, perl, solaris, sun, zfs by Lee