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
| Here's my most recent stack... | |
| View/System/ows/cache/runner.pl | |
| View/Runner.pm | |
| MooseX::Workers | |
| Moose, POE | |
| ========================================================== | |
| View/System/ows/cache/runner.pl | |
| ========================================================== |
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
| my $string = "abcdef"; | |
| my $newstring; | |
| foreach my $letter (split //, $string) { | |
| $newstring .= "[$letter]"; | |
| } | |
| print "$newstring\n"; |
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
| use strict; | |
| use diagnostics; | |
| use warnings; | |
| use IPC::System::Simple qw(run system capture EXIT_ANY); | |
| use WWW::Search; | |
| $SIG{ALRM} = sub { die "timeout" }; | |
| my $random_word = random_dictionary_word(); | |
| my $oSearch = new WWW::Search('MSN'); |
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
| use strict; | |
| use warnings; | |
| use diagnostics; | |
| my %weeks; | |
| open my $fh, "<", "weekConverter.txt" or die "Can't open weeks file: $!"; | |
| while (<$fh>) { | |
| chomp; | |
| my ($date, $week) = split /\t/; | |
| } |
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
| jhannah@cplreynoldslpt:~/src/bioperl-live$ git diff origin/master dbolser/master --stat | |
| Bio/Annotation/DBLink.pm | 25 ++- | |
| Bio/DB/GFF.pm | 26 ++- | |
| Bio/DB/GFF/Adaptor/dbi.pm | 303 ++++++++++++++++++++++++ | |
| Bio/DB/GFF/Adaptor/dbi/mysql.pm | 39 +++- | |
| Bio/DB/GFF/Adaptor/dbi/oracle.pm | 13 +- | |
| Bio/DB/GFF/Adaptor/dbi/pg.pm | 16 ++- | |
| Bio/DB/SeqFeature/Store.pm | 40 ++++ | |
| Bio/DB/SeqFeature/Store/DBI/mysql.pm | 145 ++++++------ | |
| Bio/Location/Simple.pm | 10 +- |
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
| jhannah@jaysnet-MacBook:~/src/bioperl-live/t/SeqFeature$ cat Store-SQLite.t | |
| use Test::More tests => 2; | |
| use strict; | |
| use Bio::SeqIO; | |
| use Bio::DB::SeqFeature::Store; | |
| my $db = Bio::DB::SeqFeature::Store->new( | |
| -adaptor => 'DBI::SQLite', | |
| -dsn => 'test.sqlite', |
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
| jhannah@klab:~/src/sandbox/Lynx_$ perl go.pl input.blastout | |
| Indexing blast files. | |
| kb8_rep_c1 | |
| jhannah@klab:~/src/sandbox/Lynx_$ perl go.pl input.blastout | |
| Indexing blast files. | |
| --------------------- WARNING --------------------- | |
| MSG: File /home/jhannah/src/sandbox/Lynx_/input.blastout already indexed. Skipping... | |
| --------------------------------------------------- | |
| kb8_rep_c1 |
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
| So let's put some potential locations down for meet up with a few criteria: | |
| 1) Non-smoking. | |
| 1.2) MOAR TAMALES | |
| 2) Not too loud. | |
| 3) Somewhat affordable. | |
| 3) One or two locations per quadrant of the metroplex. | |
| Potential locations for DFW.pm social meet up: |
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/perl | |
| use strict; | |
| use warnings; | |
| $site = "http://sample.com"; | |
| $testcommand = "test command"; | |
| print "SAMPLE\n"; | |
| Base(); |
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
| From: Heath Bair <bairhc@gmail.com> | |
| Date: November 17, 2010 1:36:38 PM CST | |
| To: Jay Hannah <jhannah@mutationgrid.com> | |
| Subject: Re: YAPC::NA::2011 t-shirts | |
| Reply-To: bairhc@gmail.com | |
| Jay | |
| Just an FYI, if you can pass this on to people. I have 1 of the 2, 1 | |
| TB external disks for storing videos from YAPC. Jon Hogue has the |