$ perl -le 'print join( "\n", glob( "static1,ar{1,2},static2,ar{3,4,5}" ) )'
static1,ar1,static2,ar3
static1,ar1,static2,ar4
static1,ar1,static2,ar5
static1,ar2,static2,ar3
static1,ar2,static2,ar4
static1,ar2,static2,ar5