-
Follow Us!
-
Search the Blog
-
-
Recent Posts
- Cisco to Juniper BGP command conversions March 15, 2020
- Cisco ASA BGP configuration November 20, 2019
- Cisco ASA with PPPOE failover line October 28, 2019
- Let’s talk about AF-Groups, Session-Groups and Neighbor-Groups October 26, 2019
- Let’s talk about Peer-Groups, Session-Templates and Policy-Templates October 26, 2019
-
Archives
- March 2020
- November 2019
- October 2019
- September 2019
- September 2016
- August 2016
- January 2016
- June 2014
- April 2014
- October 2013
- September 2013
- August 2013
- July 2013
- June 2013
- April 2013
- March 2013
- February 2013
- January 2013
- December 2012
- November 2012
- October 2012
- September 2012
- June 2012
- May 2012
- April 2012
- March 2012
- February 2012
- January 2012
- December 2011
- November 2011
- October 2011
- September 2011
-
Tags
- Apache
- Array
- ASA
- BGP
- C
- Cisco
- Cisco 877
- Cisco ASA
- Compression
- deduplication
- EIGRP
- Eval
- failover
- FreeBSD
- FTP
- FTTC
- GRE
- Hash
- Infinity
- IPv6
- Jail
- Juniper
- K&R
- Mac
- Mod_Secure
- MySQL
- Nagios
- Objective-C
- Perl
- Quota
- References
- restore
- Schwartzian Transform
- Security
- Sendmail
- Snapshot
- Sorting
- Spamassassin
- SRX
- SSL
- uniq
- Virtusertable
- VPN
- Xcode4
- ZFS
-
General Links
Perl Links
-
Category Archives: Perl
Cisco periodic reboot using perl
A request to reboot a Cisco ASA every week came in today. Under Cisco IOS there is a kron which would accommodate us here, however there appears to be no such thing under the ASA OS (is it still called … Continue reading
Nagios jitter testing
As part of our new SLA we are required to test and repost on jitter across the core of our network on a per MPLS VPN basis. That seemed ok to start with, but a Nagios does not have an … Continue reading
Posted in Cisco, FreeBSD Administration, Perl, test_cat
Tagged Jitter test, Nagios, Perl
Leave a comment
Adding the Spamhaus drop list to MimeDefang on FreeBSD
We have decided to use the Spamhaus drop list on our anti-spam system, which will help us block certain net blocks that have been hijacked by spammers. We wanted to use this list in line with the other features of … Continue reading
A bit more Perl and eval – this time with WWW::Mechanize
So while all of the patriotic Brits were flag waving for the Queens Diamond Jubilee, I was asked to write a Nagios test to monitor whether our email archiving system was working. The test specified that if a user could … Continue reading
MAC Address Lookup Tool Database
I decided that rather than use somebody elses lookup tool for checking MAC addresses against vendors, I’d put my own on line! The first task was to find the list, which was quite straightforward: http://standards.ieee.org/develop/regauth/oui/oui.txt When you look at the … Continue reading
MIMEDefang – processing the valid users list ( filter_recipient() )
I’m rebuilding our spam scanning platform at the moment and making some changes/improvements along the way. One of our issues was that we want to show customers ‘just how bad it is’ without spam scanning and so would like to … Continue reading
Posted in FreeBSD Administration, MIMEDefang, MySQL, Perl
Tagged access list, MIMEDefang, mimedefang-filter, Perl, Sendmail
Leave a comment
Fibonacci and C arrays- the perfect combo
New year upon us and back to the C training. Tonights mission was to output Fibonacci numbers via an array. The Fibonacci sequence is a sequence of numbers where the next number is the sum of the previous 2 numbers. … Continue reading
Testing SMTP-AUTH from the command line
I’m building a new pair of ‘mail-relay’ servers for customers to mail out through. Customers can only use SMTP-AUTH to send mail, but i needed a method of testing the mechanism. Actually I’ll be using MySQL based usernames and passwords, … Continue reading
Sloppy File Handling – Perl
When reading around the subject of file handling in Perl its easy to get sloppy, phrases like ‘automatic cleanup’ and the like lull us into believing that the close statement is just a ‘nice to have’. Well this burnt me … Continue reading
Posted in FreeBSD Administration, MySQL, Perl
Tagged Filehandles, FreeBSD, MySQL, Perl
Leave a comment
Synchronising Nameservers (Bind + FreeBSD) with Perl
A funny thing happened to a colleague’s name servers the other day. Whilst very diligent in almost every respect when it comes to failover, redundancy, etc, etc he was bitten by a simple yet overlooked issue. We all synchronise name … Continue reading