Re: org babel table header sent to awk code block

Re: org babel table header sent to awk code block

[Eric S Fraga]

[-- Attachment #1: Type: text/plain, Size: 851 bytes --]

On Friday, 17 Feb 2017 at 12:33, Roland Everaert wrote:
> Hi,
>
> I am trying to filter a table using the following awk code block.

I think your problem is an error in the awk script; specifically, the
match is outputting all lines because you need to have the { on the same
line as the match expression.  Try this:

#+BEGIN_SRC awk :stdin list-example :var fstcol=1 :var seccol=3 :results output org
  BEGIN {
  print "|Host|Result"
  print "|-"
  }
  $seccol ~ /[0-9]{1,3}(\.[0-9]\{1,3\}){3}/ {
  print "|"$fstcol"|"$seccol
  }
#+END_SRC

You may have noticed that the second line (which had an empty third
column so should not have matched) was also being output when it
shouldn't have.

In any case, the above works for me.

HTH,
eric

-- 
: Eric S Fraga (0xFFFCF67D), Emacs 26.0.50.1, Org release_9.0.4-242-g2c27b8

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 194 bytes --]

Re: org babel table header sent to awk code block

[Roland Everaert]

[-- Attachment #1: Type: text/plain, Size: 1175 bytes --]

I see that more or less 30 seconds after posting to the ML :/

So the problem of this script is solved.

But anyway, why are column headers sent to the script, even with :hlines
and/or :colnames set approriately?

Thanks.

On Fri, Feb 17, 2017 at 2:08 PM, Eric S Fraga <e.fraga@ucl.ac.uk> wrote:

> On Friday, 17 Feb 2017 at 12:33, Roland Everaert wrote:
> > Hi,
> >
> > I am trying to filter a table using the following awk code block.
>
> I think your problem is an error in the awk script; specifically, the
> match is outputting all lines because you need to have the { on the same
> line as the match expression.  Try this:
>
> #+BEGIN_SRC awk :stdin list-example :var fstcol=1 :var seccol=3 :results
> output org
>   BEGIN {
>   print "|Host|Result"
>   print "|-"
>   }
>   $seccol ~ /[0-9]{1,3}(\.[0-9]\{1,3\}){3}/ {
>   print "|"$fstcol"|"$seccol
>   }
> #+END_SRC
>
> You may have noticed that the second line (which had an empty third
> column so should not have matched) was also being output when it
> shouldn't have.
>
> In any case, the above works for me.
>
> HTH,
> eric
>
> --
> : Eric S Fraga (0xFFFCF67D), Emacs 26.0.50.1, Org release_9.0.4-242-g2c27b8
>

[-- Attachment #2: Type: text/html, Size: 1792 bytes --]

org babel table header sent to awk code block

[Roland Everaert]

[-- Attachment #1: Type: text/plain, Size: 927 bytes --]

Hi,

I am trying to filter a table using the following awk code block.
#+BEGIN_SRC awk :stdin list-example :var fstcol=1 :var seccol=3 :results
output org
  BEGIN {
  print "|Host|Result"
  print "|-"
  }
  $seccol ~ /[0-9]{1,3}(\.[0-9]\{1,3\}){3}/
  {
  print "|"$fstcol"|"$seccol
  }
#+END_SRC

The input table:

    #+NAME: list-example
    | A      |            B |            C |
    |--------+--------------+--------------|
    | blabla |  12.147.5.74 | 10.23.31.189 |
    | test   |  147.12.5.74 |              |
    | hello  | 79.147.64.74 | 10.23.31.189 |


And the result is:


#+RESULTS:
#+BEGIN_SRC org
| Host   |       Result |
|--------+--------------|
| A      |            C |
| blabla | 10.23.31.189 |
| test   |              |
| hello  | 10.23.31.189 |
#+END_SRC


Why the column names of the table are sent to awk?

I have tried to set :colnames and :hlines, but that doesn't change the
behavior.


Regards.

[-- Attachment #2: Type: text/html, Size: 1310 bytes --]