#!/usr/bin/perl #complete -G '*.bak'