($stamp = join '_', (split '[/ ]', $stamp)[1,2,4]) =~ tr/://d;