$ brew search php54
php54 php54-geoip php54-leveldb php54-mongo php54-proctitle php54-solr php54-uuid php54-yaml
php54-amqp php54-graphdat php54-libevent php54-msgpack php54-pspell php54-ssh2 php54-wbxml php54-zmq
php54-apc php54-http php54-libvirt php54-mysqlnd_ms php54-pthreads php54-stats php54-xcache
php54-apcu php54-igbinary php54-lzf php54-oauth php54-raphf php54-svm php54-xdebug
php54-chdb php54-imagick php54-mailparse php54-opcache php54-redis php54-tidy php54-xhgui
php54-couchbase php54-inclued php54-mcrypt php54-parsekit php54-riak php54-timezonedb php54-xhp
php54-dbase php54-intl php54-memcache php54-pcntl php54-runkit php54-tokyotyrant php54-xhprof
php54-ev php54-ioncubeloader php54-memcached php54-pdflib php54-scrypt php54-twig php54-yac
php54-gearman php54-jsmin php54-midgard2 php54-phalcon php54-snappy php54-uploadprogress php54-yaf
#!/usr/bin/perl
use strict;
use warnings;
die "Usage: $0 filtered.txt filter.txt\n" if @ARGV != 2;
my %filter;
open F, $ARGV[1] or die "Cannot open $ARGV[1]: $!\n";
while(<F>) {
chomp;
$filter{$_} = 1;
}
close F;
open F, $ARGV[0] or die "Cannot open $ARGV[0]: $!\n";
while(<F>) {
chomp;
print "$_\n" unless $filter{$_};
$filter{$_} = 1;
}
use warnings;
$test_2=1;
$test_1 = "hello\n";
print $test_1;
use warnings;
my $test_2=1;
$test_1 = "hello\n";
print $test_1;