#!/bin/sh
ibam | perl -ne '
    s/^Adapted battery time left:\s+/v/ and print;
    s/^Adapted charge time left:\s+/^/ and print;
    s/^Total battery time:\s+/*/ and print;
'