#!/usr/bin/perl while (<>) { s/^__version__ = ".+?"$/__version__ = "dev"/; print; }