Imprimir mensajes de correo electrónico desde mutt: ¿cómo evitar saltos de línea?

Question 1

Parece que esa X-Spam-Statuslínea es un encabezado RFC822 "continuo" que abarca varias líneas.

Un encabezado comienza con un espacio sin espacios en blanco en el primer carácter de una línea. Una línea que no está en blanco con un espacio en blanco al principio es una continuación de la línea anterior y una línea en blanco finaliza los encabezados.

Si desea filtrar un encabezado en particular, necesitará algo más compatible con RFC822 que grep. Quizás una cosa perlo awk.

Incluso podrías hacer algo al respecto en ese

while read line
do
  echo "$line" >> $infile
done < "${1:-/dev/stdin}"

como no repetir una línea que comienza con a X-Spam-Status(y establecer una bandera), luego omitir las líneas 'continuas' hasta llegar a un nuevo encabezado (y borrar la bandera).

De cualquier manera, es necesario que el programa sea consciente de cómo se formatean los encabezados RFC822.

Tal vez necesites preguntarte si realmente te importa tanto ese encabezado en tu impresión.

Aun así, un filtro no es tan difícil.

#!/user/bin/perl

my $skip=0;

# First do the headers
while(<STDIN>)
{
        #Test for end of headers
        if(/^\s*$/)
        {
                #copy the header ending blank
                printf $_;

                #exit the while loop
                last;
        }

        #Starts with non whitespace, new header
        $skip = 0 if /^\S/;

        #skip stuff if its the header we don't want
        $skip = 1 if /^X-Spam-Status/i;

        #copy lines if we're not skipping
        print $_ if !$skip;
}

# now the rest of the file
while(<STDIN>)
{
        #copy lines
        print $_;
}

Answer

Parece que esa X-Spam-Statuslínea es un encabezado RFC822 "continuo" que abarca varias líneas.

Un encabezado comienza con un espacio sin espacios en blanco en el primer carácter de una línea. Una línea que no está en blanco con un espacio en blanco al principio es una continuación de la línea anterior y una línea en blanco finaliza los encabezados.

Si desea filtrar un encabezado en particular, necesitará algo más compatible con RFC822 que grep. Quizás una cosa perlo awk.

Incluso podrías hacer algo al respecto en ese

while read line
do
  echo "$line" >> $infile
done < "${1:-/dev/stdin}"

como no repetir una línea que comienza con a X-Spam-Status(y establecer una bandera), luego omitir las líneas 'continuas' hasta llegar a un nuevo encabezado (y borrar la bandera).

De cualquier manera, es necesario que el programa sea consciente de cómo se formatean los encabezados RFC822.

Tal vez necesites preguntarte si realmente te importa tanto ese encabezado en tu impresión.

Aun así, un filtro no es tan difícil.

#!/user/bin/perl

my $skip=0;

# First do the headers
while(<STDIN>)
{
        #Test for end of headers
        if(/^\s*$/)
        {
                #copy the header ending blank
                printf $_;

                #exit the while loop
                last;
        }

        #Starts with non whitespace, new header
        $skip = 0 if /^\S/;

        #skip stuff if its the header we don't want
        $skip = 1 if /^X-Spam-Status/i;

        #copy lines if we're not skipping
        print $_ if !$skip;
}

# now the rest of the file
while(<STDIN>)
{
        #copy lines
        print $_;
}

Question 2

Como dice @infixed, el encabezado X-Spam-Status continúa en varias líneas.

Si lo ha procmailinstalado, puede utilizar su formailutilidad para concatenar encabezados continuos.

De man formail:

-c Concatenar campos continuos en el encabezado. Puede resultar útil al posprocesar correo con utilidades de texto estándar (orientadas a líneas).

Por ejemplo:

set print_command="formail -c | grep -v X-Spam-Status: | $HOME/bin/mutt_print.sh"

Aún mejor, puedes utilizar formail -Ipara eliminar un encabezado, sin necesidad de grep -v:

set print_command="formail -I X-Spam-Status | $HOME/bin/mutt_print.sh"

-I campo de encabezado

Igual que -i, excepto que cualquier campo similar existente simplemente se elimina. Si el campo de encabezado consta únicamente de un nombre de campo, efectivamente elimina el campo.

RE: mejoras al script:

¿Por qué usar vim (ycopia impresa) ¿Cuándo gustan a2psy enscriptexisten las herramientas?

Ambos tienen todo tipo de opciones útiles para formatear el texto y la salida postscript.
¿Por qué el while read line...bucle lento cuando puedes usarlo cat ${1:--} > "$infile"para guardar la entrada estándar en un archivo?
Coloque siempre comillas dobles alrededor de las variables cuando las utilice. por ejemplo, no use $infile, use "$infile"en su lugar.
Utilice $(...) en lugar de comillas invertidas.
El script no utiliza ninguna característica específica de bash, así que úselo #!/bin/sh(o tal vez #!/bin/dashsi lo tiene instalado).
Si está utilizando mkdir -p, no necesita probar si el directorio ya existe. mkdir -pya lo hace por ti.
gjots2lprdesde elgjots2El paquete parece hacer la mayor parte o la totalidad de lo que hace su script.

Su secuencia de comandos podría reemplazarse con un contenedor simple gjots2lprque establezca las variables de entorno que usa para anular los valores predeterminados (por ejemplo, para indicarle si usar a2pso enscript, qué visor ps/pdf usar, qué comando de impresión usar, etc.).

De gjots2lpr -h:

Uso: gjots2lpr [-pt] [nombre de archivo...]

Imprime un archivo de texto, si es posible utilizando Postscript o PDF y visores previos disponibles y diálogo de impresora. Busca y utiliza cualquier utilidad que pueda encontrar en el sistema.

Si no se proporciona 'nombre de archivo', se imprime STDIN.

Answer