#!/bin/bash

a=$(svn status cpanm/sources | perl -ne '@a = split; print $a[1],$/ if $a[0] eq "?"')
rm $a