#!/bin/bash

(

	# Just troll-in the first record:

	relpipe-in-cli generate Heathers 7 \

		Duke string McNamara string Chandler string Veronica string J.D. string \

		Big string Fun string \

		'' '# <file system>' '<mount point>' '<type>' '<options>' '<dump>' '<pass>';

		# relpipe-out-nullbyte processes only attribute values

	# Read the actual pipe's input:

	cat

)	| relpipe-out-nullbyte \

	| xargs --null --max-args=7 perl -e \

		'printf("%-*s %-*s %-*s %-*s %-*s %s\n",

			# following numbers define paddings:

			50, ($ARGV[0] eq "" ? $ARGV[1] : "$ARGV[0]=$ARGV[1]"),

			40, ($ARGV[2] eq "" ? "none" : $ARGV[2]),

			16, $ARGV[3],

			50, $ARGV[4],

			 8, $ARGV[5],

			    $ARGV[6]

		);'