arolson101

arolson101 / loseit-to-myfitnesspal.pl

Last active December 28, 2015 10:49

	#!/usr/bin/perl -w
	use strict;
	use warnings;

	my $csv = 'Weights.csv';
	my $script = 'myfitnesspalscript.html';

	my $header = <<HEADER_END;
	<?xml version="1.0" encoding="UTF-8"?>
	<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">