Perl Script для поиска и замены в файле запросов .SQL с пользовательским вводом

no your ans Wrong

Выбор Al и Ah происходит от AX не от EAX

, например

EAX=0000 0000 0000 0000 0000 0000 0000 0111

Итак, если мы назовем AX it должен возвращать

0000 0000 0000 0111

, если мы вызываем AH, он должен возвращать

0000 0000

, и когда мы вызываем AL, он должен возвращать

0000 0111

Пример номер 2

EAX: 22 33 55 77
AX: 55 77
AH: 55    
AL: 77

пример 3

EAX: 1111 0000 0000 0000 0000 0000 0000 0111    
AX= 0000 0000 0000 0111
AH= 0000 0000
AL= 0000 0111  
1
задан T.Mount 1 June 2010 в 20:40
поделиться

1 ответ

$infile = '$path/Base/TABLE_1-26.sql';

Строка в этой строке заключена в одинарные кавычки, поэтому $ path не будет интерполироваться, поэтому ваша программа ищет файл с буквальным именем $ path / Base /TABLE_1-26.sql .

Вы хотите

$infile = "$path/Base/TABLE_1-26.sql";

Или, лучше,

use File::Spec;
....
$infile = File::Spec->catfile($path, 'Base', 'TABLE_1-26.sql');

и аналогично для $ outfile - или это было $ infile2 ? :) Я настоятельно рекомендую поместить use strict; и use warnings; вверху этого и ваших будущих скриптов.

2
ответ дан 3 September 2019 в 00:08
поделиться
Другие вопросы по тегам:

Похожие вопросы: