1 #! /bin/bash

     2 perl -i"" -p - *.html <<'___'

     3 BEGIN {

     4     $firma = "FIRMA";

     5     if (open(I, "firma")) {

     6 	$firma = <I>;

     7 	close(I);

     8     } else { $firma = `hostname -f` }

     9     chomp $firma;

    10 }

    11     s/<% FIRMA %>/$firma/g;

    12 ___