#! perl -sw
use strict;

sub weather {
	# do stuff to gen data
	return 'This is the generated data';
}

1;