Question: I'm using freeglut and glew32 in Visual Studio 2017, however, I have to include libraries and edit properties every time I open a new project. Is there a way to set it once and forever?

Answer: 
Please try this out:

```
use Date::Parse qw(str2time);
use Date::Format qw(time2str);

my $string = '2019-02-28T08:42:57+0000';

my $time = str2time($string);
my $date = time2str("%Y-%m-%d %H:%M:%S", $time);

print $date;

```
The simplest solution, in this case, (as simbabque has already pointed out) is to just treat the date as a string. As well as the `substr()` solution you've been given, you could use a regex to remove the "T" and everything following it.

```
$date =~ s/T.*$//;

```

If you really want to parse and reformat the date, then [Time::Piece](https://metacpan.org/pod/Time::Piece) has been included with the standard Perl distribution since 2007.

```
use Time::Piece;

$date = '2019-02-28T08:42:57+0000';
my $tp = Time::Piece->strptime($date, '%Y-%m-%dT%H:%M:%S%z');
say $tp->strftime('%Y-%m-%d');

```

For more complicated date and time handling (not needed here, but I'm including it for completeness) you should read for [DateTime](https://metacpan.org/pod/DateTime) and its friends.

```
use DateTime;
use DateTime::Format::Strptime;

my $parser = DateTime::Format::Strptime->new(
  pattern => '%Y-%m-%dT%H:%M:%S%z',
);

my $date = '2019-02-28T08:42:57+0000';

my $dt = $parser->parse_datetime($date);

say $dt->strftime('%Y/%m/%d');

```