Create prg_bar.pl