# Double space a file
perl -pe '$\="\n"'
perl -pe 'BEGIN { $\="\n" }'
perl -pe '$_ .= "\n"'
perl -pe 's/$/\n/'
perl -nE 'say'

# Double space a file, except the blank lines
perl -pe '$_ .= "\n" unless /^$/'
perl -pe '$_ .= "\n" if /\S/'

# Triple space a file
perl -pe '$\="\n\n"'
perl -pe '$_.="\n\n"'

# N-space a file
perl -pe '$_.="\n"x7'

# Add a blank line before every line
perl -pe 's//\n/'

# Remove all blank lines
perl -ne 'print unless /^$/'
perl -lne 'print if length'
perl -ne 'print if /\S/'

# Remove all consecutive blank lines, leaving just one
perl -00 -pe ''
perl -00pe0

# Compress/expand all blank lines into N consecutive ones
perl -00 -pe '$_.="\n"x4'

# Fold a file so that every set of 10 lines becomes one tab-separated line
perl -lpe '$\ = $. % 10 ? "\t" : "\n"'

LINE NUMBERING
--------------

# Number all lines in a file
perl -pe '$_ = "$. $_"'

# Number only non-empty lines in a file
perl -pe '$_ = ++$a." $_" if /./'

# Number and print only non-empty lines in a file (drop empty lines)
perl -ne 'print ++$a." $_" if /./'

# Number all lines but print line numbers only non-empty lines
perl -pe '$_ = "$. $_" if /./'

# Number only lines that match a pattern, print others unmodified
perl -pe '$_ = ++$a." $_" if /regex/'

# Number and print only lines that match a pattern
perl -ne 'print ++$a." $_" if /regex/'

# Number all lines, but print line numbers only for lines that match a pattern
perl -pe '$_ = "$. $_" if /regex/'

# Number all lines in a file using a custom format (emulate cat -n)
perl -ne 'printf "%-5d %s", $., $_'

# Print the total number of lines in a file (emulate wc -l)
perl -lne 'END { print $. }'
perl -le 'print $n=()=<>'
perl -le 'print scalar(()=<>)'
perl -le 'print scalar(@foo=<>)'
perl -ne '}{print $.'
perl -nE '}{say $.'

# Print the number of non-empty lines in a file
perl -le 'print scalar(grep{/./}<>)'
perl -le 'print ~~grep{/./}<>'
perl -le 'print~~grep/./,<>'
perl -E 'say~~grep/./,<>'

# Print the number of empty lines in a file
perl -lne '$a++ if /^$/; END {print $a+0}'
perl -le 'print scalar(grep{/^$/}<>)'
perl -le 'print ~~grep{/^$/}<>'
perl -E 'say~~grep{/^$/}<>'

# Print the number of lines in a file that match a pattern (emulate grep -c)
perl -lne '$a++ if /regex/; END {print $a+0}'
perl -nE '$a++ if /regex/; END {say $a+0}'

CALCULATIONS
------------

# Check if a number is a prime
perl -lne '(1x$_) !~ /^1?$|^(11+?)\1+$/ && print "$_ is prime"'

# Print the sum of all the fields on a line
perl -MList::Util=sum -alne 'print sum @F'

# Print the sum of all the fields on all lines
perl -MList::Util=sum -alne 'push @S,@F; END { print sum @S }'
perl -MList::Util=sum -alne '$s += sum @F; END { print $s }'

# Shuffle all fields on a line
perl -MList::Util=shuffle -alne 'print "@{[shuffle @F]}"'
perl -MList::Util=shuffle -alne 'print join " ", shuffle @F'

# Find the minimum element on a line
perl -MList::Util=min -alne 'print min @F'

# Find the minimum element over all the lines
perl -MList::Util=min -alne '@M = (@M, @F); END { print min @M }'
perl -MList::Util=min -alne '$min = min @F; $rmin = $min unless defined $rmin && $min > $rmin; END { print $rmin }'

# Find the maximum element on a line
perl -MList::Util=max -alne 'print max @F'

# Find the maximum element over all the lines
perl -MList::Util=max -alne '@M = (@M, @F); END { print max @M }'

# Replace each field with its absolute value
perl -alne 'print "@{[map { abs } @F]}"'

# Find the total number of fields (words) on each line
perl -alne 'print scalar @F'

# Print the total number of fields (words) on each line followed by the line
perl -alne 'print scalar @F, " $_"'

# Find the total number of fields (words) on all lines
perl -alne '$t += @F; END { print $t}'

# Print the total number of fields that match a pattern
perl -alne 'map { /regex/ && $t++ } @F; END { print $t }'
perl -alne '$t += /regex/ for @F; END { print $t }'
perl -alne '$t += grep /regex/, @F; END { print $t }'

# Print the total number of lines that match a pattern
perl -lne '/regex/ && $t++; END { print $t }'

# Print the number PI to n decimal places
perl -Mbignum=bpi -le 'print bpi(n)'

# Print the number PI to 39 decimal places
perl -Mbignum=PI -le 'print PI'

# Print the number E to n decimal places
perl -Mbignum=bexp -le 'print bexp(1,n+1)'

# Print the number E to 39 decimal places
perl -Mbignum=e -le 'print e'

# Print UNIX time (seconds since Jan 1, 1970, 00:00:00 UTC)
perl -le 'print time'

# Print GMT (Greenwich Mean Time) and local computer time
perl -le 'print scalar gmtime'
perl -le 'print scalar localtime'

# Print local computer time in H:M:S format
perl -le 'print join ":", (localtime)[2,1,0]'

# Print yesterday's date
perl -MPOSIX -le '@now = localtime; $now[3] -= 1; print scalar localtime mktime @now'

# Print date 14 months, 9 days and 7 seconds ago
perl -MPOSIX -le '@now = localtime; $now[0] -= 7; $now[4] -= 14; $now[7] -= 9; print scalar localtime mktime @now'

# Prepend timestamps to stdout (GMT, localtime)
tail -f logfile | perl -ne 'print scalar gmtime," ",$_'
tail -f logfile | perl -ne 'print scalar localtime," ",$_'

# Calculate factorial of 5
perl -MMath::BigInt -le 'print Math::BigInt->new(5)->bfac()'
perl -le '$f = 1; $f *= $_ for 1..5; print $f'

# Calculate greatest common divisor (GCM)
perl -MMath::BigInt=bgcd -le 'print bgcd(@list_of_numbers)'

# Calculate GCM of numbers 20 and 35 using Euclid's algorithm
perl -le '$n = 20; $m = 35; ($m,$n) = ($n,$m%$n) while $n; print $m'

# Calculate least common multiple (LCM) of numbers 35, 20 and 8
perl -MMath::BigInt=blcm -le 'print blcm(35,20,8)'

# Calculate LCM of 20 and 35 using Euclid's formula: n*m/gcd(n,m)
perl -le '$a = $n = 20; $b = $m = 35; ($m,$n) = ($n,$m%$n) while $n; print $a*$b/$m'

# Generate 10 random numbers between 5 and 15 (excluding 15)
perl -le '$n=10; $min=5; $max=15; $, = " "; print map { int(rand($max-$min))+$min } 1..$n'

# Find and print all permutations of a list
perl -MAlgorithm::Permute -le '$l = [1,2,3,4,5]; $p = Algorithm::Permute->new($l); print @r while @r = $p->next'

# Generate the power set
perl -MList::PowerSet=powerset -le '@l = (1,2,3,4,5); for (@{powerset(@l)}) { print "@$_" }'

# Convert an IP address to unsigned integer
perl -le '$i=3; $u += ($_<<8*$i--) for "127.0.0.1" =~ /(\d+)/g; print $u'
perl -le '$ip="127.0.0.1"; $ip =~ s/(\d+)\.?/sprintf("%02x", $1)/ge; print hex($ip)'
perl -le 'print unpack("N", 127.0.0.1)'
perl -MSocket -le 'print unpack("N", inet_aton("127.0.0.1"))'

# Convert an unsigned integer to an IP address
perl -MSocket -le 'print inet_ntoa(pack("N", 2130706433))'
perl -le '$ip = 2130706433; print join ".", map { (($ip>>8*($_))&0xFF) } reverse 0..3'
perl -le '$ip = 2130706433; $, = "."; print map { (($ip>>8*($_))&0xFF) } reverse 0..3'

STRING CREATION AND ARRAY CREATION
----------------------------------

# Generate and print the alphabet
perl -le 'print a..z'
perl -le 'print ("a".."z")'
perl -le '$, = ","; print ("a".."z")'
perl -le 'print join ",", ("a".."z")'

# Generate and print all the strings from "a" to "zz"
perl -le 'print ("a".."zz")'
perl -le 'print "aa".."zz"'

# Create a hex lookup table
@hex = (0..9, "a".."f")

# Convert a decimal number to hex using @hex lookup table
perl -le '$num = 255; @hex = (0..9, "a".."f"); while ($num) { $s = $hex[($num%16)&15].$s; $num = int $num/16 } print $s'
perl -le '$hex = sprintf("%x", 255); print $hex'
perl -le '$num = "ff"; print hex $num'

# Generate a random 8 character password
perl -le 'print map { ("a".."z")[rand 26] } 1..8'
perl -le 'print map { ("a".."z", 0..9)[rand 36] } 1..8'

# Create a string of specific length
perl -le 'print "a"x50'

# Create a repeated list of elements
perl -le '@list = (1,2)x20; print "@list"'

# Create an array from a string
@months = split ' ', "Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec"
@months = qw/Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec/

# Create a string from an array
@stuff = ("hello", 0..9, "world"); $string = join '-', @stuff

# Find the numeric values for characters in the string
perl -le 'print join ", ", map { ord } split //, "hello world"'

# Convert a list of numeric ASCII values into a string
perl -le '@ascii = (99, 111, 100, 105, 110, 103); print pack("C*", @ascii)'
perl -le '@ascii = (99, 111, 100, 105, 110, 103); print map { chr } @ascii'

# Generate an array with odd numbers from 1 to 100
perl -le '@odd = grep {$_ % 2 == 1} 1..100; print "@odd"'
perl -le '@odd = grep { $_ & 1 } 1..100; print "@odd"'

# Generate an array with even numbers from 1 to 100
perl -le '@even = grep {$_ % 2 == 0} 1..100; print "@even"'

# Find the length of the string
perl -le 'print length "one-liners are great"'

# Find the number of elements in an array
perl -le '@array = ("a".."z"); print scalar @array'
perl -le '@array = ("a".."z"); print $#array + 1'

TEXT CONVERSION AND SUBSTITUTION
--------------------------------

# ROT13 a string
'y/A-Za-z/N-ZA-Mn-za-m/'

# ROT 13 a file
perl -lpe 'y/A-Za-z/N-ZA-Mn-za-m/' file

# Base64 encode a string
perl -MMIME::Base64 -e 'print encode_base64("string")'
perl -MMIME::Base64 -0777 -ne 'print encode_base64($_)' file

# Base64 decode a string
perl -MMIME::Base64 -le 'print decode_base64("base64string")'
perl -MMIME::Base64 -ne 'print decode_base64($_)' file

# URL-escape a string
perl -MURI::Escape -le 'print uri_escape($string)'

# URL-unescape a string
perl -MURI::Escape -le 'print uri_unescape($string)'

# HTML-encode a string
perl -MHTML::Entities -le 'print encode_entities($string)'

# HTML-decode a string
perl -MHTML::Entities -le 'print decode_entities($string)'

# Convert all text to uppercase
perl -nle 'print uc'
perl -ple '$_=uc'
perl -nle 'print "\U$_"'

# Convert all text to lowercase
perl -nle 'print lc'
perl -ple '$_=lc'
perl -nle 'print "\L$_"'

# Uppercase only the first word of each line
perl -nle 'print ucfirst lc'
perl -nle 'print "\u\L$_"'

# Invert the letter case
perl -ple 'y/A-Za-z/a-zA-Z/'

# Camel case each line
perl -ple 's/(\w+)/\u$1/g'
perl -ple 's/(?<!['])(\w+)/\u\1/g'

# Strip leading whitespace (spaces, tabs) from the beginning of each line
perl -ple 's/^[ \t]+//'
perl -ple 's/^\s+//'

# Strip trailing whitespace (space, tabs) from the end of each line
perl -ple 's/[ \t]+$//'

# Strip whitespace from the beginning and end of each line
perl -ple 's/^[ \t]+|[ \t]+$//g'

# Convert UNIX newlines to DOS/Windows newlines
perl -pe 's|\n|\r\n|'

# Convert DOS/Windows newlines to UNIX newlines
perl -pe 's|\r\n|\n|'

# Convert UNIX newlines to Mac newlines
perl -pe 's|\n|\r|'

# Substitute (find and replace) "foo" with "bar" on each line
perl -pe 's/foo/bar/'

# Substitute (find and replace) all "foo"s with "bar" on each line
perl -pe 's/foo/bar/g'

# Substitute (find and replace) "foo" with "bar" on lines that match "baz"
perl -pe '/baz/ && s/foo/bar/'

# Binary patch a file (find and replace a given array of bytes as hex numbers)
perl -pi -e 's/\x89\xD8\x48\x8B/\x90\x90\x48\x8B/g' file

SELECTIVE PRINTING AND DELETING OF CERTAIN LINES
------------------------------------------------

# Print the first line of a file (emulate head -1)
perl -ne 'print; exit'

# Print the first 10 lines of a file (emulate head -10)
perl -ne 'print if $. <= 10'
perl -ne '$. <= 10 && print'
perl -ne 'print if 1..10'

# Print the last line of a file (emulate tail -1)
perl -ne '$last = $_; END { print $last }'
perl -ne 'print if eof'

# Print the last 10 lines of a file (emulate tail -10)
perl -ne 'push @a, $_; @a = @a[@a-10..$#a]; END { print @a }'

# Print only lines that match a regular expression
perl -ne '/regex/ && print'

# Print only lines that do not match a regular expression
perl -ne '!/regex/ && print'

# Print the line before a line that matches a regular expression
perl -ne '/regex/ && $last && print $last; $last = $_'

# Print the line after a line that matches a regular expression
perl -ne 'if ($p) { print; $p = 0 } $p++ if /regex/'

# Print lines that match regex AAA and regex BBB in any order
perl -ne '/AAA/ && /BBB/ && print'

# Print lines that don't match match regexes AAA and BBB
perl -ne '!/AAA/ && !/BBB/ && print'

# Print lines that match regex AAA followed by regex BBB followed by CCC
perl -ne '/AAA.*BBB.*CCC/ && print'

# Print lines that are 80 chars or longer
perl -ne 'print if length >= 80'

# Print lines that are less than 80 chars in length
perl -ne 'print if length < 80'

# Print only line 13
perl -ne '$. == 13 && print && exit'

# Print all lines except line 27
perl -ne '$. != 27 && print'
perl -ne 'print if $. != 27'

# Print only lines 13, 19 and 67
perl -ne 'print if $. == 13 || $. == 19 || $. == 67'
perl -ne 'print if int($.) ~~ (13, 19, 67)'

# Print all lines between two regexes (including lines that match regex)
perl -ne 'print if /regex1/../regex2/'

# Print all lines from line 17 to line 30
perl -ne 'print if $. >= 17 && $. <= 30'
perl -ne 'print if int($.) ~~ (17..30)'
perl -ne 'print if grep { $_ == $. } 17..30'

# Print the longest line
perl -ne '$l = $_ if length($_) > length($l); END { print $l }'

# Print the shortest line
perl -ne '$s = $_ if $. == 1; $s = $_ if length($_) < length($s); END { print $s }'

# Print all lines that contain a number
perl -ne 'print if /\d/'

# Find all lines that contain only a number
perl -ne 'print if /^\d+$/'

# Print all lines that contain only characters
perl -ne 'print if /^[[:alpha:]]+$/

# Print every second line
perl -ne 'print if $. % 2'

# Print every second line, starting the second line
perl -ne 'print if $. % 2 == 0'

# Print all lines that repeat
perl -ne 'print if ++$a{$_} == 2'

# Print all unique lines
perl -ne 'print unless $a{$_}++'

# Print the first field (word) of every line (emulate cut -f 1 -d ' ')
perl -alne 'print $F[0]'

HANDY REGULAR EXPRESSIONS
-------------------------

# Match something that looks like an IP address
/^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/
/^(\d{1,3}\.){3}\d{1,3}$/

# Test if a number is in range 0-255
/^([0-9]|[0-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5])$/

# Match an IP address
my $ip_part = qr|([0-9]|[0-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5])|;
if ($ip =~ /^($ip_part\.){3}$ip_part$/) {
say "valid ip";
}

# Check if the string looks like an email address
/\S+@\S+\.\S+/

# Check if the string is a decimal number
/^\d+$/
/^[+-]?\d+$/
/^[+-]?\d+\.?\d*$/

# Check if the string is a hexadecimal number
/^0x[0-9a-f]+$/i

# Check if the string is an octal number
/^0[0-7]+$/

# Check if the string is binary
/^[01]+$/

# Check if a word appears twice in the string
/(word).*\1/

# Increase all numbers by one in the string
$str =~ s/(\d+)/$1+1/ge

# Extract HTTP User-Agent string from the HTTP headers
/^User-Agent: (.+)$/

# Match printable ASCII characters
/[ -~]/

# Match unprintable ASCII characters
/[^ -~]/

# Match text between two HTML tags
m|<strong>([^<]*)</strong>|
m|<strong>(.*?)</strong>|

# Replace all <b> tags with <strong>
$html =~ s|<(/)?b>|<$1strong>|g

# Extract all matches from a regular expression
my @matches = $text =~ /regex/g;

PERL TRICKS
-----------

# Print the version of a Perl module
perl -MModule -le 'print $Module::VERSION'
perl -MLWP::UserAgent -le 'print $LWP::UserAgent::VERSION'

Sequence Analysis and General Bioinformatics

• BLAST, Ian Korf, Mark Yandell, Joseph Bedell, 2003, O'Reilly
• Sequence Analysis in a Nutshell: A Guide to Common Tools and Databases, Scott Markel, Darryl Leon, 2003, O'Reilly
• Bioinformatics for Geneticists, Michael Barnes, Ian C Gray (Editors), 2003, John Wiley & Sons
• Bioinformatics for Dummies, Jean-Michel Claverie, Cedric Notredame, 2003, John Wiley & Sons
• Mathematics of Genome Analysis, Jerome K. Percus, 2002, Cambridge Univ Press
• Bioinformatics Computing, Bryan P. Bergeron, 2002, Prentice Hall
• Evolutionary Computation in Bioinformatics, Gary B. Fogel, David W. Corne (Editors), 2002, Morgan Kaufmann
• Introduction to Bioinformatics, Arthur M. Lesk, 2002, Oxford University Press
• Instant Notes in Bioinformatics, D.R. Westhead, J. H. Parish, R.M. Twyman, 2002, Bios Scientific Pub
• Fundamental Concepts of Bioinformatics, Dan E. Krane, Michael L. Raymer, Michaeel L. Raymer, Elaine Nicpon Marieb, 2002, Benjamin/Cummings
• Essentials of Genomics and Bioinformatics, C. W. Sensen (Editor), 2002, John Wiley & Sons
• Current Topics in Computational Molecular Biology (Computational Molecular Biology), Tao Jiang, Ying Xu, Michael Zhang (Editors), 2002, MIT Press
• Hidden Markov Models for Bioinformatics, Timo Koski, Timo Koskinen, 2001, Kluwer Academic Publishers
• Bioinformatics: From Genomes to Drugs, Thomas Lengauer (Editor), 2001, John Wiley & Sons
• Statistical Methods in Bioinformatics: An Introduction (Statistics for Biology and Health), Warren Ewens, Gregory Grant, 2001, Springer Verlag
• Bioinformatics: A Practical Guide to the Analysis of Genes and Proteins, Second Edition, Andreas D. Baxevanis, B. F. Francis Ouellette, 2001, Wiley-Interscience
• Bioinformatics: The Machine Learning Approach, Second Edition (Adaptive Computation and Machine Learning), Pierre Baldi, Soren Brunak, Sren Brunak, 2001, MIT Press
• Introduction to Bioinformatics, T eresa Attwood, David Parry-Smith, 2001, Prentice Hall
• Bioinformatics: A Primer, Charles Staben, 2001, Jones & Bartlett Pub
• Data Analysis and Classification for Bioinformatics, Arun Jagota, 2000, AKJ Academics
• Bioinformatics: Sequence and Genome Analysis, David W. Mount, 2001, Cold Spring Harbor Laboratory Press
• Bioinformatics: A Biologist's Guide to Biocomputing and the Internet, Stuart M. Brown, 2000, Eaton Pub Co
• Bioinformatics: Sequence, Structure and Databanks: A Practical Approach (The Practical Approach Series, 236), Des Higgins (Editor), Willie Taylor (Editor), 2000, Oxford Univ Press
• Neural Networks and Genome Informatics, Cathy H. Wu, Jerry W. McLarty, 2000, Elsevier Science
• Computational Molecular Biology: An Introduction (Wiley Series in Mathematical and Computational Biology), Peter Clote and Rolf Backofen, 2000, John Wiley & Sons
• Computational Molecular Biology: An Algorithmic Approach, Pavel A. Pevzner, 2000, MIT Press
• Post-Genome Informatics, Minoru Kanehisa, 2000, Oxford Univ Press
• Mathematical and Computational Biology: Computational Morphogenesis, Hierarchical Complexity, and Digital Evolution, Chrystopher L. Nehaniv, 1999, American Mathematical Society
• Pattern Discovery in Biomolecular Data: Tools, Techniques, and Applications, Jason T. L. Wang, Bruce A. Shapiro, Dennis Elliott Shasha (Editors), 1999, Oxford Univ Press
• Time Warps, String Edits, and Macromolecules: The Theory and Practice of Sequence Comparison, David Sankoff and Joseph Kruskal (Editors), 1999, Cambridge University Press
• Bioinformatics Basics: Applications in Biological Science and Medicine, Hooman Rashidi, 1999, CRC Press
• Bioinformatics: Methods and Protocols (Methods in Molecular Biology, Vol 132), Stephen Misener and Stephen A. Krawetz (Editors),1999, Humana Press
• Bioinformatics: Databases and Systems, Stanley Letovsky (Editor),1999, Kluwer Academic Publishers
• Computational Molecular Biology, P. Green, 1998, Blackwell Science Inc.
• Computational Methods in Molecular Biology (New Comprehensive Biochemistry, V. 32), Steven L. Salzberg, David B. Searls, Simon Kasif (Editors), 1998, Elsevier Science Ltd.
• Biological Sequence Analysis: Probabilistic Models of Proteins and Nucleic Acids, Richard Durbin, S. Eddy, A. Krogh, G. Mitchison, 1998, Cambridge University Press
• Guide to Human Genome Computing, M. J. Bishop (Editor), 1998, Academic Press
• Introduction to Computational Molecular Biology, Joao Meidanis, Joao C. Setabal, 1997, PWS Pub. Co.
• Algorithms on Strings, Trees, and Sequences: Computer Science and Computational Biology, Dan Gusfield, 1997, Cambridge University Press
• Sequence Data Analysis Guidebook, Simon R. Swindell (Editor), 1997, Humana Press
• High Performance Computational Methods for Biological Sequence Analysis, Tieng K. Yap, Ophir Frieder, Robert L. Martino, 1996, Kluwer Academic Pub.
• Computer Methods for Macromolecular Sequence Analysis, Methods in Enzymology, volume 266, Russell F. Doolittle (Editor), 1996, Academic Press
• DNA and Protein Sequence Analysis: A Practical Approach (Practical Approach Series , No 171), 1996, M. J. Bishop and C. J. Rawlings (Editors), 1996, IRL Press
• Molecular Bioinformatics: Algorithms and Applications, Steffen Schulze-Kremer, 1995, Walter De Gruyter
• Introduction to Computational Biology - Maps, sequences and genomes, Michael S. Waterman, 1995, Chapman & Hall
• Computer Analysis of Sequence Data, Annette M. Griffin and Hugh G. Griffin (Editors), 1994, Humana Press
• Artificial Intelligence and Molecular Biology, Lawrence Hunter (Editor), 1993, AAAI Press
• Sequence Analysis Primer, Michael Gribskov and John Devereux (Editors), 1992, Oxford University Press
• Mathematical Methods of Analysis of Biopolymer Sequences (Dimacs Series in Discrete Mathematics and Theoretical Computer Science ; Volume 8), S. G. Gindikin, 1992, American Mathematical Society
• Mathematical Methods for DNA Sequences, Michael S. Waterman (Editor), 1989, CRC Press

Programming Books for Bioinformatics

• Mastering Perl for Bioinformatics, James D. Tisdall, 2003, O'Reilly
• Genomic Perl: From Bioinformatics Basics to Working Code, Rex A. Dwyer, 2002, Cambridge University Press
• Beginning Perl for Bioinformatics, James Tisdall, 2001, O'Reilly
• Developing Bioinformatics Computer Skills, Cynthia Gibas, Per Jambeck, 2001, O'Reilly

General Genomics

• Functional Microbial Genomics (Volume 33), Brendan Wren, Nick Dorrell, 2003, Academic Press
• Discovering Genomics, Proteomics, and Bioinformatics, A. Malcolm Campbell, Laurie J. Heyer, 2002, Benjamin/Cummings
• Genomes, Terence A. Brown, 2002, John Wiley & Sons
• Essentials of Medical Genomics, Stuart M. Brown , 2002, John Wiley & Sons
• A Primer of Genome Science, Greg Gibson, Spencer V. Muse, 2002, Sinauer Associates
• Pathogen Genomics: Impact on Human Health, Karen Joy, Phd Shaw (Editors), 2002, Humana Press
• Genomics, John E. Antonopoulos, 2000, Xlibris Corporation
• Genomics and Proteomics: Functional and Computational Aspects, Sandor Suhai (Editor), 2000, Plenum Pub Corp
• Functional Genomics: A Practical Approach (The Practical Approach Series, 235), S. Hunt and F. Livesey (Editors), 2000, Oxford Univ Press
• Human Molecular Genetics, Andrew P. Read, Tom Strachan 1999, BIOS Scientific Publishers Ltd.
• Genomics: The Science and Technology Behind the Human Genome Project, Charles R. Cantor and Cassandra L. Smith, 1999, John Wiley & Sons
• Cells: A Laboratory Manual, 3 volumes, David L. Spector, Robert D. Goldman, Leslie A. Leinwand, 1998, Cold Spring Harbor Laboratory Press
• Genome Analysis: A Laboratory Manual, 4 volumes, Bruce Birren, et al. (Editors), 1997, Cold Spring Harbor Laboratory Press
• The Human Genome Project, N. G. Cooper (Editor), 1994, University Science Books

Comparative Genomics

• Handbook of Comparative Genomics: Principles and Methodology, Cecilia Saccone, Graziano Pesole, 2003, Wiley-Liss
• Sequence - Evolution - Function: Computational Approaches in Comparative Genomics, Eugene V. Koonin, Michael Y. Galperin, 2002, Kluwer Academic Publishers
• Comparative Genomics - Empirical and Analytical Approaches to Gene Order Dynamics, Map Alignment and the Evolution of Gene Families, David Sankoff and Joseph H. Nadeau, 2000, Kluwer Academic Pub
• Comparative Genomics, Melody Clark (Editor), 2000, Kluwer Academic Pub

Proteomics

• Proteins and Proteomics: A Laboratory Manual, Richard J. Simpson (Editor), Cold Spring Harbor Laboratory
• Proteomics in Practice: A Laboratory Manual of Proteome Analysis , Reiner Westermeier, Tom Naven, 2002, John Wiley & Sons
• Posttranslational Modifications of Proteins: Tools for Functional Proteomics (Methods in Molecular Biology, Vol 194) , Christoph Kannicht (Editor), 2002, Humana Press
• Peptide Arrays on Membrane Supports: Synthesis and Applications (Springer Lab Manual), Joachim Koch, Michael Mahler (Editors), 2002, Springer Verlag
• Proteomics , Timothy Palzkill, 2002, Kluwer Academic Publishers
• Introduction to Proteomics: Tools for the New Biology , Daniel C. Liebler (Editor), 2001, Humana Press
• Proteome Research: Mass Spectrometry (Principles and Practice) , P. James (Editor), 2001, Springer Verlag
• Interpreting Protein Mass Spectra: A Comprehensive Resource , A. Peter Snyder, 2000, American Chemical Society
• Protein Sequencing and Identification Using Tandem Mass Spectrometry , Michael Kinter, Nicholas E. Sherman, 2000, Wiley-Interscience
• From Genome to Proteome: Advances in the Practice and Application of Proteomics, Michael J. Dunn (Editor), 2000, Vch Verlagsgesellschaft Mbh
• Proteomics: From Protein Sequence to Function, S. Pennington (Editor), M. Dunn (Editor), 2000, Springer Verlag
• Proteome Research: Two-Dimensional Gel Electrophoresis and Detection Methods (Principles and Practice), T. Rabilloud (Editor), 2000, Springer Verlag
• Proteome and Protein Analysis, R. M. Kamp, D. Kyriakidis, th Choli-Papadopoulou (Editor), 1999, Springer Verlag
• Proteome Research: New Frontiers in Functional Genomics, M. R. Wilkins, et al. (Editors), 1997, Springer Verlag

Protein Structure

• Structural Bioinformatics, Philip E. Bourne, Helge Weissig (Editors), 2003, John Wiley & Sons
• Protein Structure Prediction: Bioinfomatic Approach, I.F. Tsigelny, 2002, International University Line
• Introduction to Protein Architecture: The Structural Biology of Proteins, Arthur M. Lesk, 2001, Oxford University Press
• Protein Structure Prediction: Methods and Protocols, David M. Webster (Editor), 2000, Humana Press
• Introduction to Protein Structure, Carl-Ivar Branden, John Tooze, 1999, Garland Publishing
• Structure and Mechanism in Protein Science: A Guide to Enzyme Catalysis and Protein Folding, Alan Fersht, 1999, Freeman

Pharmacogenomics

• Pharmacogenomics: Social, Ethical, and Clinical Dimensions, Mark A. Rothstein (Editor), 2003, Wiley-Liss
• Pharmacogenomics: The Search for Individualized Therapies, Julio Licinio, Ma-Li Wong (Editors), 2002, John Wiley & Sons
• Pharmacogenomics, Werner Kalow, Urs A. Meyer, Rachel Tyndale (Editors), 2001, Marcel Dekker
• Pharmacogenetics and Pharmcogenomics: Recent Conceptual and Technical Advances (Pharmacology, Volume 61, Number 3, 2000), Elliot S. Vesell (Editor), 2000, S. Karger Publishing
• Pharmacogenetics, Wendell Weber, 1997, Oxford University Press

DNA Microarrays

• Statistical Analysis of Gene Expression Microarray Data, T. P. Speed (Editor), 2003, CRC Press
• Microarray Gene Expression Data Analysis: A Beginner's Guide, Helen C. Causton, John Quackenbush, Alvis Brazma, 2003, Blackwell Publishers
• The Analysis of Gene Expression Data (Statistics for Biology and Health), G. Parmigiani, E. S. Garrett, R. A. Irizarry, S. Zeger , Graeme Clark (Editors), 2003, Springer Verlag
• A Practical Approach to Microarray Data Analysis, Daniel P. Berrar, Werner Dubitzky, Martin Granzow (Editors), 2002, Kluwer Academic Publishers
• DNA Microarrays and Gene Expression: From Experiments to Data Analysis and Modeling, Pierre Baldi, G. Wesley Hatfield, 2002, Cambridge University Press
• DNA Microarrays: A Molecular Cloning Manual, David Bowtell, Joseph Sambrook (Editors), 2002, Cold Spring Harbor Laboratory
• DNA Array Image Analysis: Nuts & Bolts, Gerda Kamberova, Shishir Shah, 2002, DNA Press
• Microarray Analysis, Mark Schena, 2002, John Wiley & Sons
• A Biologist's Guide to Analysis of DNA Microarray Data, Steen Knudsen, 2002, John Wiley & Sons
• Microarrays for an Integrative Genomics (Computational Molecular Biology), Isaac S. Kohane, Alvin Kho, Atul J. Butte, 2002, MIT Press
• Microarrays for the Neurosciences: An Essential Guide (Cellular and Molecular Neuroscience), Daniel H. Geschwind, Jeffrey P. Gregg (Editors), 2002, MIT Press
• DNA Microarrays: Gene Expression Applications, Bertrand Jordan (Editor), 2001, Springer Verlag
• DNA Arrays: Methods and Protocols (Methods in Molecular Biology, Volume 170), Jang B. Rampal (Editor), 2001, Humana Press
• DNA Arrays: Technologies and Experimental Strategies, Elena V. Grigorenko (Editor), 2001, CRC Press
• Microarray Biochip Technology, Mark Schena (Editor), 2000, Eaton Pub
• Expression Genetics: Accelerated and High-Throughput Methods (Biotechniques Update Series), Michael McClelland (Editor), Arthur B. Pardee (Editor), 1999, Eaton Pub
• DNA Microarrays: A Practical Approach (Practical Approach Series 205), Mark Schena (Editor), 1999, Oxford Univ Press
• cDNA Preparation and Characterization (Methods in Enzymology Volume 303), S.M. Weissman (Editor), 1999, Academic Press

Systems Biology, Genetic and Biochemical Network

• Handbook of Graphs and Networks : From the Genome to the Internet, Stefan Bornholdt, Heinz Georg Schuster (Editors), 2003, Vch Verlagsgesellschaft Mbh
• Computational Cell Biology, Christopher Fall, Eric Marland, John Wagner, John Tyson (Editors), 2002, Springer Verlag
• Gene Regulation and Metabolism: Post-Genomic Computational Approaches (Computational Molecular Biology), Julio Collado-Vides, Ralf Hofestadt (Editors), 2002, MIT Press
• Foundations of Systems Biology, Hiroaki Kitano (Editor), 2001, MIT Press
• Genomic Regulatory Systems: Development and Evolution, Eric H. Davidson , 2001, Academic Press
• Genes & Signals, Mark Ptashne, Alexander Gann, 2001, Cold Spring Harbor Laboratory
• Computational Modeling of Genetic and Biochemical Networks (Computational Molecular Biology), James M. Bower and Hamid Bolouri (Editors), 2001, MIT Press
• Protein-Protein Interactions: A Molecular Cloning Manual, Erica Golemis (Editor), 2001, Cold Spring Harbor Laboratory
• Computational Analysis of Biochemical Systems: A Practical Guide for Biochemists and Molecular Biologists, Eberhard O. Voit, 2000, Cambridge University Press
• Mathematical Physiology, James P. Keener, James Sneyd, 1998, Springer Verlag

DNA Sequencing

• DNA Sequencing: From Experimental Methods to Bioinformatics (Introduction to Biotechniques Series), Luke Alphey, 1997, Springer Verlag
• Automated DNA sequencing and analysis, Adams M.D., Fields C., Venter J.C. (Editors), 1994, Academic Press

Apart from above mentioned books, you can also find some useful books links at following mentioned URLs:

http://www.amazon.com/Biological-Sequence-Analysis-Probabilistic-Proteins/dp/0521629713

http://www.amazon.com/Bioinformatics-Genes-Proteins-Computers-Advanced/dp/1859960545

http://www.amazon.com/Introduction-Bioinformatics-Algorithms-Computational-Molecular/dp/0262101068

http://books.google.no/books?id=pxSM7R1sdeQC&dq=Pierre+baldi+%2B+bioinformatics&printsec=frontcover&source=bn&hl=en&ei=IoGRS6uCIJT-NYLA8Z0N&sa=X&oi=book_result&ct=result&redir_esc=y#v=onepage&q&f=false

http://www.amazon.com/Statistical-Methods-Bioinformatics-Introduction-Statistics/dp/0387400826

If you think your favourite books are not listed then please write it down in comment section for the benefits of other users. Feel free to add many more books in comment section.