# read file into $file

$file =~ s/href\s*=\s*("|')(.*?)\1/'href="'.lc($2).'"'/ges;
$file =~ s/src\s*=\s*("|')(.*?)\1/'src="'.lc($2).'"'/ges;

# write file here