Beginner Perl Maven tutorial: 8.4 - finding a string in a file

Показать описание

Code Maven
Perl (Programming Language)

Рекомендации по теме

Комментарии

This is not explicit enough. If you really want to help, you should go all the way. I have tried using a file handle, and then regex to look for a string within the file, but it doesn't find it:
#!/usr/bin/perl
system ("unzip -p harman_hisbo_15.odt meta.xml > meta.txt");
system ("touch result.txt");
open(INPUT, '<', 'meta.txt');
open(RESULT, '>', 'result.txt');
print RESULT "It matches\n" if (<INPUT> =~ /date/);
system ("less result.txt");
system ("touch -d 20080824 harman_hisbo_15.odt");
My aim is to use the date, or rather the digits following the string date, to change the file's date to the original creation date of the OpenOffice document. I don't understand why the file handle <INPUT> does not allow me to find anything in it. Would be great if you have a solution.

waxy

Beginner Perl Maven tutorial: 8.4 - finding a string in a file

Beginner Perl Maven tutorial 4.8 - array indexes

Beginner Perl Maven tutorial: 8.4 - finding a string in a file

Beginner Perl Maven tutorial: 8.16 - solution regexes 3

Beginner Perl Maven tutorial 4.4 -creating an array

Beginner Perl Maven tutorial 4.3 - foreach loop over list

Beginner Perl Maven tutorial 4.1 - lists in perl

Beginner Perl Maven tutorial: 13.8 - Processing config file

Beginner Perl Maven tutorial: 2.14 - String functions: index

Beginner Perl Maven tutorial: 5.4 - Filehandle in SCALAR and LIST context

Beginner Perl Maven tutorial: 1.9 - Perl on the command line

Beginner Perl Maven tutorial: 11.4 - file globbing

Beginner Perl Maven tutorial 4.11 - Command line parameters

Beginner Perl Maven tutorial: 9.8 - Exercise: hexa octal binary

Beginner Perl Maven tutorial: 10.15 - Solution: split HTTP using Regexes

Beginner Perl Maven tutorial: 4.16 - Process CSV file (short version)

Beginner Perl Maven tutorial: 1.2 - Editors and IDEs for Perl development

Beginner Perl Maven tutorial: 1.8 POD - Plain Old Documentation

Beginner Perl Maven tutorial: 3.4 - Open file with error handling

Beginner Perl Maven tutorial: 5.11 - sort

Beginner Perl Maven tutorial: 7.3 - creating a hash from array

Modern Perl Tutorial - part 04 - String functions (lc, uc, length, index, substr)

Beginner Perl Maven tutorial: 10.3 - multiple lines in regexes

Beginner Perl Maven tutorial: 4.18 -Process CSV file using Text::CSV_XS

Beginner Perl Maven tutorial: 10.12 - split with regex