Ben Bridts benbridts

AWS Technologist @ Cloudar

chrismeyersfsu / blink_ip.pl

Created June 2, 2012 15:27

Raspberry Pi Blink Ip Address

	#!/usr/bin/perl
	my $dev = "/sys/class/leds/led0/brightness";
	my $OFF = "1";
	my $ON = "0";

	my ($ip) = `ifconfig`=~/ddr:(.*?) /;
	#print $ip;

	# Strip out the .'s
	$ip =~ s/\.//g;