|
Lines 117-123
sub process_file {
Link Here
|
| 117 |
# |
117 |
# |
| 118 |
# We use a callback replacement to handle each match individually |
118 |
# We use a callback replacement to handle each match individually |
| 119 |
$content =~ s{ |
119 |
$content =~ s{ |
| 120 |
(<script) # Capture opening <script |
120 |
(<script|<style) # Capture opening <script or <style |
| 121 |
( # Capture existing attributes |
121 |
( # Capture existing attributes |
| 122 |
(?: |
122 |
(?: |
| 123 |
\s+ # Whitespace before attribute |
123 |
\s+ # Whitespace before attribute |
| 124 |
- |
|
|